Przeglądaj źródła

ob-tangle.el (org-babel-spec-to-string): Don't use `org-babel-trim

* ob-tangle.el (org-babel-spec-to-string): Don't use
`org-babel-trim'.
Bastien Guerry 11 lat temu
rodzic
commit
a13e133f5a
1 zmienionych plików z 4 dodań i 1 usunięć
  1. 4 1
      lisp/ob-tangle.el

+ 4 - 1
lisp/ob-tangle.el

@@ -352,7 +352,10 @@ that the appropriate major-mode is set.  SPEC has the form:
      (format
       "%s\n"
       (org-unescape-code-in-string
-       (org-babel-trim body (if org-src-preserve-indentation "[\f\n\r\v]")))))
+       (let ((rep (if org-src-preserve-indentation "[\f\n\r\v]"
+		    "[\f\t\n\r\v]")))
+	 (replace-regexp-in-string
+	  (concat rep "\\(.+\\)" rep) "\\1" body)))))
     (when link-p
       (funcall
        insert-comment