added completion message to `org-babel-tangle'

This commit is contained in:
Eric Schulte 2009-06-27 13:36:51 -07:00
parent e9c2c6a590
commit 87e07ee66d
1 changed files with 2 additions and 1 deletions

View File

@ -95,7 +95,8 @@ file into their own source-specific files."
(to-file (format "%s-%s.%s" base-name (car session-pair) ext) (cdr session-pair))) (to-file (format "%s-%s.%s" base-name (car session-pair) ext) (cdr session-pair)))
by-session) by-session)
(to-file (format "%s.%s" base-name ext) (cdr (car by-session))))))) (to-file (format "%s.%s" base-name ext) (cdr (car by-session)))))))
blocks)))) blocks)
(message "tangled %d source-code blocks" block-counter))))
(defun org-babel-spec-to-string (spec) (defun org-babel-spec-to-string (spec)
"Insert the source-code specified by SPEC into the current "Insert the source-code specified by SPEC into the current