Commit 275b59b0 authored by Noah Friedman's avatar Noah Friedman
Browse files

apropos.el (apropos-print-doc): Only use emacs-lisp-docstring-fill-column when...

apropos.el (apropos-print-doc): Only use emacs-lisp-docstring-fill-column when it is bound to an integer, per that variable's documentation.
parent 6c19f744
2011-05-06 Noah Friedman <friedman@splode.com>
* apropos.el (apropos-print-doc): Only use
emacs-lisp-docstring-fill-column when it is bound to an integer,
per that variable's documentation.
2011-05-06 Stefan Monnier <monnier@iro.umontreal.ca>
* lpr.el (print-region-1): Echo lpr-program's output, so error messages
......
......@@ -1133,7 +1133,9 @@ If non-nil TEXT is a string that will be printed as a heading."
(put-text-property opoint (point) 'font-lock-face 'shadow))
;; The labeling buttons might make the line too long, so fill it if
;; necessary.
(let ((fill-column (+ 5 emacs-lisp-docstring-fill-column))
(let ((fill-column (+ 5 (if (integerp emacs-lisp-docstring-fill-column)
emacs-lisp-docstring-fill-column
fill-column)))
(fill-prefix (make-string ocol ?\s)))
(fill-region opoint (point) nil t)))
(or (bolp) (terpri)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment