# HG changeset patch # User Juanma Barranquero # Date 1196091295 0 # Node ID b8e6a2408b6dc65c6e7dc13ab0e6efe0b0e51c6f # Parent 9d48040f06e14e96503417c1f0a4bbdb62cd3558 (batch-byte-recompile-directory): Doc fix. diff -r 9d48040f06e1 -r b8e6a2408b6d lisp/emacs-lisp/bytecomp.el --- a/lisp/emacs-lisp/bytecomp.el Mon Nov 26 09:57:22 2007 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Mon Nov 26 15:34:55 2007 +0000 @@ -974,7 +974,7 @@ (pos (if (and byte-compile-current-file (integerp byte-compile-read-position)) (with-current-buffer byte-compile-current-buffer - (format "%d:%d:" + (format "%d:%d:" (save-excursion (goto-char byte-compile-last-position) (1+ (count-lines (point-min) (point-at-bol)))) @@ -1657,7 +1657,7 @@ byte-compile-dest-file) (setq target-file (byte-compile-dest-file filename)) (setq byte-compile-dest-file target-file) - (with-current-buffer + (with-current-buffer (setq input-buffer (get-buffer-create " *Compiler Input*")) (erase-buffer) (setq buffer-file-coding-system nil) @@ -4185,7 +4185,7 @@ For example, invoke `emacs -batch -f batch-byte-recompile-directory .'. Optional argument ARG is passed as second argument ARG to -`batch-recompile-directory'; see there for its possible values +`byte-recompile-directory'; see there for its possible values and corresponding effects." ;; command-line-args-left is what is left of the command line (startup.el) (defvar command-line-args-left) ;Avoid 'free variable' warning