Merge 81bf626 into 38240d1

README.md

@@ -169,6 +169,7 @@ and run `M-x cm-test-mdarkdown-to-html`.
 
 * [cm-test](https://github.com/kostafey/cm-test)
 * [ejc-sql](https://github.com/kostafey/ejc-sql)
+* [flower](https://github.com/PositiveTechnologies/flower)
 
 ## Requirements:
 

src/elisp/clomacs.el

@@ -120,9 +120,11 @@ If can't find any nREPL process return nil."
     raw-string))
 
 (defun clomacs-clean-result-string (return-string)
-  (s-replace-all '(("\\\"" . "\"")
+  (s-replace-all '(("\\\\" . "\\")
+                   ("\\\"" . "\"")
                    ("\\n"  . "\n")
-                   ("\\t"  . "\t")) return-string))
+                   ("\\t"  . "\t"))
+                 return-string))
 
 (defun clomacs-format-result (raw-string return-type)
   "Format Elisp representation of Clojure evaluation result."

test/clj/clomacs/cm_test.clj

@@ -8,4 +8,5 @@
 
 (defn text-with-newlines []
   (str "Some text in the first line \n"
-       "and text in the new line."))
+       "and text in the new line. "
+       "Text with backslash and \\no new line."))

test/elisp/clomacs-test.el

@@ -77,7 +77,8 @@
   (should (equal
            (clomacs-test-text-with-newlines)
            (concat "Some text in the first line \n"
-                   "and text in the new line.")))
+                   "and text in the new line. "
+                   "Text with backslash and \\no new line.")))
 
   (clomacs-defun clomacs-test-md-wrapper
                  my-md-to-html-string