* find-dired for remote directories
@ 2004-02-15 23:43 Michael Albinus
2004-02-18 17:55 ` Richard Stallman
0 siblings, 1 reply; 2+ messages in thread
From: Michael Albinus @ 2004-02-15 23:43 UTC (permalink / raw)
Hello,
find-dired works over local directories only. I've made a patch that
it calls `shell-command' (asynchronously) instead of
`start-process-shell-command'. By this, `find-grep-dired' and
`find-name-dired` work over remote directories too, using Tramp.
The patch looks like this:
magdalene:~/src/emacs/lisp> diff -u find-dired.el.~1.46.~ find-dired.el
--- find-dired.el.~1.46.~ 2003-12-29 23:03:51.000000000 +0100
+++ find-dired.el 2004-02-15 15:50:10.000000000 +0100
@@ -121,6 +121,8 @@
""
(concat "\\( " args " \\) "))
(car find-ls-option)))
+ ;; Start the find process.
+ (shell-command (concat args "&") (current-buffer))
;; The next statement will bomb in classic dired (no optional arg allowed)
(dired-mode dir (cdr find-ls-option))
(let ((map (make-sparse-keymap)))
@@ -149,8 +151,7 @@
;; ``wildcard'' line.
(insert " " args "\n")
(setq buffer-read-only t)
- ;; Start the find process.
- (let ((proc (start-process-shell-command find-dired-find-program (current-buffer) args)))
+ (let ((proc (get-buffer-process (current-buffer))))
(set-process-filter proc (function find-dired-filter))
(set-process-sentinel proc (function find-dired-sentinel))
;; Initialize the process marker; it is used by the filter.
Wouldn't it be worth to apply it in the Emacs CVS? It doesn't harm in
the case of local directories. Unfortunately, I have no write access
(but I've signed the papers months ago).
Please note that the corresponding patch enabling Tramp's
`shell-command' for asynchronous processes is committed to Tramp CVS
only until now. It will appear in Emacs CVS with the next
synchronization by Kai.
Best regards, Michael.
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: find-dired for remote directories
2004-02-15 23:43 find-dired for remote directories Michael Albinus
@ 2004-02-18 17:55 ` Richard Stallman
0 siblings, 0 replies; 2+ messages in thread
From: Richard Stallman @ 2004-02-18 17:55 UTC (permalink / raw)
Cc: emacs-devel
find-dired works over local directories only. I've made a patch that
it calls `shell-command' (asynchronously) instead of
`start-process-shell-command'. By this, `find-grep-dired' and
`find-name-dired` work over remote directories too, using Tramp.
Does anyone see a reason not to do this?
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2004-02-18 17:55 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-02-15 23:43 find-dired for remote directories Michael Albinus
2004-02-18 17:55 ` Richard Stallman
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.