diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/tar-mode.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index 722a86fda7d..aa55d066958 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -4,7 +4,6 @@ ;; Author: Jamie Zawinski <jwz@lucid.com> ;; Created: 04 Apr 1990 -;; Version: 1.21bis (some cleanup by ESR) ;; Keywords: unix ;;; This file is part of GNU Emacs. @@ -889,10 +888,11 @@ for this to be permanent." (defun tar-clear-modification-flags () "Remove the stars at the beginning of each line." + (interactive) (save-excursion - (goto-char 0) + (goto-char 1) (while (< (point) tar-header-offset) - (if (looking-at "*") + (if (not (eq (following-char) ?\ )) (progn (delete-char 1) (insert " "))) (forward-line 1)))) |