[Emacs-diffs] Changes to emacs/lisp/tar-mode.el

[Pavel Janík]

Index: emacs/lisp/tar-mode.el
diff -c emacs/lisp/tar-mode.el:1.83 emacs/lisp/tar-mode.el:1.84
*** emacs/lisp/tar-mode.el:1.83 Fri Nov 16 19:04:29 2001
--- emacs/lisp/tar-mode.el      Wed Feb 20 04:03:38 2002
***************
*** 609,622 ****
          (setq tar-header-offset old-offset)))))
  
  
! (defun tar-next-line (p)
    (interactive "p")
!   (forward-line p)
    (if (eobp) nil (forward-char (if tar-mode-show-date 54 36))))
  
! (defun tar-previous-line (p)
    (interactive "p")
!   (tar-next-line (- p)))
  
  (defun tar-current-descriptor (&optional noerror)
    "Return the tar-descriptor of the current line, or signals an error."
--- 609,624 ----
          (setq tar-header-offset old-offset)))))
  
  
! (defun tar-next-line (arg)
!   "Move cursor vertically down ARG lines and to the start of the filename."
    (interactive "p")
!   (forward-line arg)
    (if (eobp) nil (forward-char (if tar-mode-show-date 54 36))))
  
! (defun tar-previous-line (arg)
!   "Move cursor vertically up ARG lines and to the start of the filename."
    (interactive "p")
!   (tar-next-line (- arg)))
  
  (defun tar-current-descriptor (&optional noerror)
    "Return the tar-descriptor of the current line, or signals an error."