瀏覽代碼

This was just an idea. We could do it but I'm reverting for now.

Revert "Make org-babel-tangle comment with ;;*."

This reverts commit c6b628d3ad1d173b6572afe3357d86aad88b312c.
Dan Davison 16 年之前
父節點
當前提交
83fc113e29
共有 1 個文件被更改,包括 6 次插入7 次删除
  1. 6 7
      lisp/org-babel-tangle.el

+ 6 - 7
lisp/org-babel-tangle.el

@@ -144,14 +144,13 @@ assumes that the appropriate major-mode is set.  SPEC has the
 form
 
   (link source-name params body)"
-  (let ((link (first spec))
-	(source-name (second spec))
-	(body (fourth spec))
-	(comment-padding "* "))
-    (flet ((insert-comment (text)
-			   (comment-region (point) (progn (insert text) (point)))))
+  (flet ((insert-comment (text)
+                         (comment-region (point) (progn (insert text) (point)))))
+    (let ((link (first spec))
+          (source-name (second spec))
+          (body (fourth spec)))
       (insert "\n\n")
-      (insert-comment (format "* [[%s][%s]]" (org-link-escape link) source-name))
+      (insert-comment (format "[[%s][%s]]" (org-link-escape link) source-name))
       (insert (format "\n%s\n" (org-babel-chomp body)))
       (insert-comment (format "%s ends here" source-name))
       (insert "\n"))))