comparison lisp/tar-mode.el @ 85478:786d3a985758

* term/x-win.el (x-gtk-stock-map, icon-map-list) (x-gtk-map-stock): Delete duplicated definitions from merge. * progmodes/octave-mod.el: Require octave-inf at compile time * progmodes/compile.el (compilation-skip-to-next-location) (compilation-skip-threshold, compilation-skip-visited): Move definitions earlier. * play/zone.el (zone-fall-through-ws): * play/landmark.el (lm-move-down, lm-move-up): * play/handwrite.el (handwrite): * mail/mspools.el (mspools-visit-spool): * wdired.el (wdired-next-line, wdired-previous-line): * tar-mode.el (tar-subfile-save-buffer): * scroll-lock.el (scroll-lock-next-line) (scroll-lock-previous-line): * image-dired.el (image-dired-next-line) (image-dired-previous-line): * ediff-help.el (ediff-help-message-line-length): Use forward-line. * smerge-mode.el (smerge-auto-refine): * diff-mode.el (diff-auto-refine): Add :group. * play/yow.el: Require doctor at compile time. * vmsproc.el: Provide vmsproc. (command-send-input): Use forward-line. * vms-patch.el: Require ps-print and vmsproc at compile time. * vc-mtn.el (log-view-message-re, log-view-file-re) (log-view-font-lock-keywords): Pacify byte-compiler. * vc-hg.el: Require log-view at compile time.
author Dan Nicolaescu <dann@ics.uci.edu>
date Sat, 20 Oct 2007 06:30:18 +0000
parents b98604865ea0
children 107ccd98fa12 4bc33ffdda1a
comparison
equal deleted inserted replaced
85477:6b081e079821 85478:786d3a985758
1208 ;; 1208 ;;
1209 ;; alter the descriptor-line... 1209 ;; alter the descriptor-line...
1210 ;; 1210 ;;
1211 (let ((position (- (length tar-parse-info) (length head)))) 1211 (let ((position (- (length tar-parse-info) (length head))))
1212 (goto-char (point-min)) 1212 (goto-char (point-min))
1213 (next-line position) 1213 (forward-line position)
1214 (beginning-of-line) 1214 (beginning-of-line)
1215 (let ((p (point)) 1215 (let ((p (point))
1216 after 1216 after
1217 (m (set-marker (make-marker) tar-header-offset))) 1217 (m (set-marker (make-marker) tar-header-offset)))
1218 (forward-line 1) 1218 (forward-line 1)