Просмотр исходного кода

Change message on tangling: "0 blocks" instead of "0 block"

Dan Davison 16 лет назад
Родитель
Сommit
37e152f61d
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      lisp/org-babel-tangle.el

+ 2 - 2
lisp/org-babel-tangle.el

@@ -124,8 +124,8 @@ exported source code blocks by language."
                   (add-to-list 'path-collector file-name))))
             specs)))
        (org-babel-tangle-collect-blocks lang))
-      (message "tangled %d source-code block%s" block-counter
-               (if (> block-counter 1) "s" ""))
+      (message "tangled %d code block%s" block-counter
+               (if (= block-counter 1) "" "s"))
       path-collector)))
 
 (defun org-babel-tangle-clean ()