[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [bep] dired-do-shell-command
- To: bep@argv.org
- Subject: Re: [bep] dired-do-shell-command
- From: Mitsugu SAKAMOTO <mitsugu@argv.org>
- Date: Wed, 13 Jun 2001 18:51:53 +0900 (jst)
- Delivered-To: mailing list bep@argv.org
- Mailing-List: contact bep-help@argv.org; run by ezmlm
- Organization: Accessibility Research Group for the Visually impaired(ARGV)
坂本です。
とりあえず、Unixとcygwin使いの人向けのお話です。
以下のコードを入れるとディレクトリが空でも何でも消すことができるようです。
さっきmew-win32で教えてもらいました。
;;; diredでディレクトリを削除
(add-hook 'dired-mode-hook
'(lambda ()
(defun delete-directory-recursive (dir)
(interactive "s")
(call-process "rm" nil nil nil "-rf" dir))
(defun delete-directory (dir)
(interactive "s")
(delete-directory-recursive dir))))
--- Mitsugu