From: Eli Zaretskii Date: Sat, 7 Mar 2009 15:30:05 +0000 (+0000) Subject: (woman-mode): Restore tab-width value after the call to Man-mode, since X-Git-Tag: emacs-pretest-23.0.92~311 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1efaf74bf4f91e18e660e8fcde09cfaf8771e39c;p=emacs.git (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. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4a73baf7260..bf139ce94a6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,9 @@ * woman.el (woman-parse-colon-path): Return a list even if there's 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 list. Don't invoke Awk. diff --git a/lisp/woman.el b/lisp/woman.el index 5fbb5ef6fdb..b7b856c9b08 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -1949,7 +1949,8 @@ See `Man-mode' for additional details." (fset 'Man-build-page-list Man-build-page-list) (fset 'Man-strip-page-headers Man-strip-page-headers) (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 mode-name "WoMan") ;; Don't show page numbers like Man-mode does. (Online documents do