From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: "leo" <halloleo@noospaam.myrealbox.com>
Newsgroups: gmane.emacs.help
Subject: Re: how to make dired-do-rename more friendly?
Date: Fri, 21 Nov 2003 16:05:20 +1100
Organization: Netspace Internet
Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <bpk6dl$1ll7$1@otis.netspace.net.au>
References: <bphal5$nsk$1@otis.netspace.net.au> <m37k1vqr2i.fsf@newsguy.com>
	<mailman.353.1069356131.399.help-gnu-emacs@gnu.org>
NNTP-Posting-Host: deer.gmane.org
X-Trace: sea.gmane.org 1069392426 2062 80.91.224.253 (21 Nov 2003 05:27:06 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Fri, 21 Nov 2003 05:27:06 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Fri Nov 21 06:27:03 2003
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 1AN3ot-0006Pp-00
	for <geh-help-gnu-emacs@m.gmane.org>; Fri, 21 Nov 2003 06:27:03 +0100
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.24)
	id 1AN4by-0006n2-Ed
	for geh-help-gnu-emacs@m.gmane.org; Fri, 21 Nov 2003 01:17:46 -0500
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!canoe.uoregon.edu!newsfeed.onenet.net!news-out.cwix.com!newsfeed.cwix.com!news1.optus.net.au!optus!news.mel.connect.com.au!news.netspace.net.au!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 39
Original-NNTP-Posting-Host: dsl-210-15-204-246.nsw.netspace.net.au
Original-X-Trace: otis.netspace.net.au 1069391093 54951 210.15.204.246 (21 Nov 2003
	05:04:53 GMT)
Original-X-Complaints-To: usenet@otis.netspace.net.au
Original-NNTP-Posting-Date: Fri, 21 Nov 2003 05:04:53 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Original-Xref: shelby.stanford.edu gnu.emacs.help:118517
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1.2
Precedence: list
List-Id: Users list for the GNU Emacs text editor  <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:14458
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:14458

cool i'll try that out!

btw: thanks for all they info!

leo

"Harry Putnam" <reader@newsguy.com> wrote in message
news:mailman.353.1069356131.399.help-gnu-emacs@gnu.org...
> Harry Putnam <reader@newsguy.com> 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)
>
>
>
>