help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: how to make dired-do-rename more friendly?


From: leo
Subject: Re: how to make dired-do-rename more friendly?
Date: Fri, 21 Nov 2003 16:05:20 +1100

cool i'll try that out!

btw: thanks for all they info!

leo

"Harry Putnam" <address@hidden> wrote in message
news:address@hidden
> Harry Putnam <address@hidden> writes:
>
> >   (defadvice dired-mark-read-file-name (around tiad act)
> >     "Instead of asking directory, offer full filename for editing.
> >   This advice is enabled only upon request."
> >     (if (and dir (string-match "/" dir))
> >         (setq dir (dired-get-filename)))
> >     ad-do-it)
> >
> >   (defadvice dired-do-rename  (around joc-tiad-dired-rename act)
> >     "Offer editing the current filename.
> >   Without this advice you don't get the old filename for editing.
> >   Activates advice 'dired-mark-read-file-name 'my 'around during call."
> >     (let* ((ADVICE 'dired-mark-read-file-name))
> >       (ad-enable-advice ADVICE 'around 'tiad)
> >       (ad-activate ADVICE)
> >       ad-do-it
> >       (ad-disable-advice ADVICE 'around 'tiad)
> >       (ad-activate ADVICE)))
>
> OOOPs a couple of ringers slipped in there.  These last two are
> something else.
>
> >   (require 'macro)
> >   (put 'narrow-to-region 'disabled nil)
>
>
>
>




reply via email to

[Prev in Thread] Current Thread [Next in Thread]