Преглед изворни кода

[CORE] Add CR to unspacify

Innocenty Enikeew пре 5 година
родитељ
комит
4af97d0661
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      utils.lisp

+ 1 - 1
utils.lisp

@@ -337,7 +337,7 @@ is replaced with replacement."
                            do (r child))))))
       (r node))))
 
-(let ((ws-regex (cl-ppcre:create-scanner "[\\n   ]+" :multi-line-mode t)))
+(let ((ws-regex (cl-ppcre:create-scanner "[\\n
   ]+" :multi-line-mode t)))
   (defun unspacify (text)
     (string-trim " " (cl-ppcre:regex-replace-all ws-regex text " "))))