procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(woman-mode): Restore tab-width value after the call to Man-mode, since

Browse source 
Man-mode resets it to the default, and that makes right	margin extend
beyond woman-fill-column.
This commit is contained in:
Eli Zaretskii 2009-03-07 15:30:05 +00:00
parent 00460cfd96
commit 1efaf74bf4
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -2,6 +2,9 @@
* woman.el (woman-parse-colon-path): Return a list even if there's * woman.el (woman-parse-colon-path): Return a list even if there's
only one directory in PATHS. only one directory in PATHS.
(woman-mode): Restore tab-width value after the call to Man-mode,
since Man-mode resets it to the default, and that makes right
margin extend beyond woman-fill-column.
* man.el (Man-init-defvars) [windows-nt]: Use a special command * man.el (Man-init-defvars) [windows-nt]: Use a special command
list. Don't invoke Awk. list. Don't invoke Awk.

3
lisp/woman.el
View file

@ -1949,7 +1949,8 @@ See `Man-mode' for additional details."
(fset 'Man-build-page-list Man-build-page-list) (fset 'Man-build-page-list Man-build-page-list)
(fset 'Man-strip-page-headers Man-strip-page-headers) (fset 'Man-strip-page-headers Man-strip-page-headers)
(fset 'Man-unindent Man-unindent) (fset 'Man-unindent Man-unindent)
(fset 'Man-goto-page Man-goto-page))) (fset 'Man-goto-page Man-goto-page)
(setq tab-width woman-tab-width)))
(setq major-mode 'woman-mode (setq major-mode 'woman-mode
mode-name "WoMan") mode-name "WoMan")
;; Don't show page numbers like Man-mode does. (Online documents do ;; Don't show page numbers like Man-mode does. (Online documents do