[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/man.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/man.el [emacs-unicode-2] |
Date: |
Wed, 27 Oct 2004 01:48:06 -0400 |
Index: emacs/lisp/man.el
diff -c emacs/lisp/man.el:1.125.2.3 emacs/lisp/man.el:1.125.2.4
*** emacs/lisp/man.el:1.125.2.3 Tue Jun 29 16:45:03 2004
--- emacs/lisp/man.el Wed Oct 27 05:42:00 2004
***************
*** 893,904 ****
'Man-target-string (match-string target-pos)
)))))
! (defun Man-cleanup-manpage ()
! "Remove overstriking and underlining from the current buffer."
! (interactive)
(message "Please wait: cleaning up the %s man page..."
Man-arguments)
! (if (or (interactive-p) (not Man-sed-script))
(progn
(goto-char (point-min))
(while (search-forward "_\b" nil t) (backward-delete-char 2))
--- 893,907 ----
'Man-target-string (match-string target-pos)
)))))
! (defun Man-cleanup-manpage (&optional interactive)
! "Remove overstriking and underlining from the current buffer.
! Normally skip any jobs that should have been done by the sed script,
! but when called interactively, do those jobs even if the sed
! script would have done them."
! (interactive "p")
(message "Please wait: cleaning up the %s man page..."
Man-arguments)
! (if (or interactive (not Man-sed-script))
(progn
(goto-char (point-min))
(while (search-forward "_\b" nil t) (backward-delete-char 2))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/man.el [emacs-unicode-2],
Miles Bader <=