Mercurial > emacs
comparison lisp/dired.el @ 3148:a4c37b95f19f
(dired-other-frame): New function, with binding.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 26 May 1993 22:52:13 +0000 |
parents | 603e39319c86 |
children | a917a964bef8 |
comparison
equal
deleted
inserted
replaced
3147:539e7c93f8fa | 3148:a4c37b95f19f |
---|---|
343 ;;;###autoload | 343 ;;;###autoload |
344 (defun dired-other-window (dirname &optional switches) | 344 (defun dired-other-window (dirname &optional switches) |
345 "\"Edit\" directory DIRNAME. Like `dired' but selects in another window." | 345 "\"Edit\" directory DIRNAME. Like `dired' but selects in another window." |
346 (interactive (dired-read-dir-and-switches "in other window ")) | 346 (interactive (dired-read-dir-and-switches "in other window ")) |
347 (switch-to-buffer-other-window (dired-noselect dirname switches))) | 347 (switch-to-buffer-other-window (dired-noselect dirname switches))) |
348 | |
349 ;;;###autoload (define-key ctl-x-5-map "d" 'dired-other-frame) | |
350 ;;;###autoload | |
351 (defun dired-other-frame (dirname &optional switches) | |
352 "\"Edit\" directory DIRNAME. Like `dired' but makes a new frame." | |
353 (interactive (dired-read-dir-and-switches "in other frame ")) | |
354 (switch-to-buffer-other-frame (dired-noselect dirname switches))) | |
348 | 355 |
349 ;;;###autoload | 356 ;;;###autoload |
350 (defun dired-noselect (dir-or-list &optional switches) | 357 (defun dired-noselect (dir-or-list &optional switches) |
351 "Like `dired' but returns the dired buffer as value, does not select it." | 358 "Like `dired' but returns the dired buffer as value, does not select it." |
352 (or dir-or-list (setq dir-or-list default-directory)) | 359 (or dir-or-list (setq dir-or-list default-directory)) |