Mercurial > emacs
comparison lisp/wdired.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 | 06241457c4f0 |
| children | 6a503e26cfe8 |
comparison
equal
deleted
inserted
replaced
| 85477:6b081e079821 | 85478:786d3a985758 |
|---|---|
| 497 (defun wdired-next-line (arg) | 497 (defun wdired-next-line (arg) |
| 498 "Move down lines then position at filename or the current column. | 498 "Move down lines then position at filename or the current column. |
| 499 See `wdired-use-dired-vertical-movement'. Optional prefix ARG | 499 See `wdired-use-dired-vertical-movement'. Optional prefix ARG |
| 500 says how many lines to move; default is one line." | 500 says how many lines to move; default is one line." |
| 501 (interactive "p") | 501 (interactive "p") |
| 502 (next-line arg) | 502 (forward-line arg) |
| 503 (if (or (eq wdired-use-dired-vertical-movement t) | 503 (if (or (eq wdired-use-dired-vertical-movement t) |
| 504 (and wdired-use-dired-vertical-movement | 504 (and wdired-use-dired-vertical-movement |
| 505 (< (current-column) | 505 (< (current-column) |
| 506 (save-excursion (dired-move-to-filename) | 506 (save-excursion (dired-move-to-filename) |
| 507 (current-column))))) | 507 (current-column))))) |
| 510 (defun wdired-previous-line (arg) | 510 (defun wdired-previous-line (arg) |
| 511 "Move up lines then position at filename or the current column. | 511 "Move up lines then position at filename or the current column. |
| 512 See `wdired-use-dired-vertical-movement'. Optional prefix ARG | 512 See `wdired-use-dired-vertical-movement'. Optional prefix ARG |
| 513 says how many lines to move; default is one line." | 513 says how many lines to move; default is one line." |
| 514 (interactive "p") | 514 (interactive "p") |
| 515 (previous-line arg) | 515 (forward-line (- arg)) |
| 516 (if (or (eq wdired-use-dired-vertical-movement t) | 516 (if (or (eq wdired-use-dired-vertical-movement t) |
| 517 (and wdired-use-dired-vertical-movement | 517 (and wdired-use-dired-vertical-movement |
| 518 (< (current-column) | 518 (< (current-column) |
| 519 (save-excursion (dired-move-to-filename) | 519 (save-excursion (dired-move-to-filename) |
| 520 (current-column))))) | 520 (current-column))))) |