瀏覽代碼

babel: Do not add indentation to perl code.

Thanks to Łukasz Stelmach.
Dan Davison 15 年之前
父節點
當前提交
f846663ce6
共有 1 個文件被更改,包括 1 次插入7 次删除
  1. 1 7
      contrib/babel/lisp/langs/org-babel-perl.el

+ 1 - 7
contrib/babel/lisp/langs/org-babel-perl.el

@@ -108,13 +108,7 @@ last statement in BODY, as elisp."
 		     (format
 		      (if (member "pp" result-params)
 			  (error "Pretty-printing not implemented for perl")
-			org-babel-perl-wrapper-method)
-		      (mapconcat
-		       (lambda (line) (format "\t%s" line))
-		       (split-string
-			(org-remove-indentation (org-babel-trim body)) "[\r\n]") "\n")
-		      tmp-file))
-		    ;; (message "buffer=%s" (buffer-string)) ;; debugging
+			org-babel-perl-wrapper-method) body tmp-file))
 		    (setq exit-code
 			  (org-babel-shell-command-on-region
 			   (point-min) (point-max) "perl" nil 'replace (current-buffer)))