From: Rainer M Krug <Rainer@krugs.de>
To: Sebastien Vauban <sva-news@mygooglest.com>
Cc: help-gnu-emacs@gnu.org
Subject: Re: Rename Shell buffer with current directory
Date: Mon, 09 Dec 2013 13:56:38 +0100 [thread overview]
Message-ID: <52A5BE06.8000605@krugs.de> (raw)
In-Reply-To: <86k3fe43jl.fsf@somewhere.org>
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
On 12/09/13, 13:22 , Sebastien Vauban wrote:
> Hi Rainer,
>
> Rainer M Krug wrote:
>>> Michael Heerdegen wrote:
>>>>> (defun my-rename-buffer-to-curdir (&optional _string)
>>>>> "Change Shell buffer's name to current directory." (message
>>>>> "%s" default-directory) (rename-buffer (concat "*shell "
>>>>> default-directory "*")))
>>>>>
>>>>> (add-hook 'shell-mode-hook 'my-rename-buffer-to-curdir)
>>>>>
>>>>> (add-hook 'comint-output-filter-functions
>>>>> 'my-rename-buffer-to-curdir nil t)
>>>> ^
>>>>> However, that does not change the end result: the name of
>>>>> the buffer is unchanged.
>>>>
>>>> Why do you use a non-nil LOCAL parameter for `add-hook'?
>>>> Without it, your code works for me.
>>>
>>> So does it for me -- thanks for your help!
>>>
>>> Though, I still don't understand why making the
>>> `my-rename-buffer-to-curdir' function buffer-local makes the
>>> above fail... Remember that that function gets called (see the
>>> message displayed in the echo area), only the function
>>> `rename-buffer' fails...
>>
>> Thanks - I am using your code, and it works very nicely - very
>> useful.
>
> You're welcome.
>
> Though, I just realized it also renames R buffers (as it is bound
> to comint mode). I'll have to make some exceptions there.
I realized the same - that's why I disabled it just now. Please post
your enhancements here, as this is a very useful function.
>
> As well, it does not handle (yet) the problem of two Shell buffers
> in the same directory, as the name won't be unique. Not sure what's
> the most straightforward approach for this one. Maybe looking at
> `uniquify' or so.
True - realised the same with the R buffers...
Cheers,
Rainer
>
> Best regards, Seb
>
- --
Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation
Biology, UCT), Dipl. Phys. (Germany)
Centre of Excellence for Invasion Biology
Stellenbosch University
South Africa
Tel : +33 - (0)9 53 10 27 44
Cell: +33 - (0)6 85 62 59 98
Fax : +33 - (0)9 58 10 27 44
Fax (D): +49 - (0)3 21 21 25 22 44
email: Rainer@krugs.de
Skype: RMkrug
-----BEGIN PGP SIGNATURE-----
Version: GnuPG/MacGPG2 v2.0.22 (Darwin)
Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/
iQEcBAEBAgAGBQJSpb4FAAoJENvXNx4PUvmCK/wIAKDoskc3ItfwfEBuXgeotAcT
RnKav0JkULQDSmldaSuCuH25bmo3/k1+BJRYiffHKCmO5tY1KSLmC3GuBwLC1tpy
YmwA0TZO7kQ7PLAreKgC5nW2Qb3dhyCol4RjeqsHeApCnPCRSV8Rhv/cd9fN3GbI
Mfsx/HPjjM/DuPYq0kL13nX1IIzbINdEBk6gCdCoo6y3lgXWRU0iiOAAdq5XkxHF
9f2m64e58rPI/u3Bo7o14wyOxUtyg1NxM1Qc5d+hdGW3e4bxEc7gPMVOLt2/YX+D
p8vuVqGlHwZP4/akwJn7C7e72wiQhFLcW1rbyjbgm5Wu1rlL1wzK4uzA5hzHMro=
=GHKH
-----END PGP SIGNATURE-----
next prev parent reply other threads:[~2013-12-09 12:56 UTC|newest]
Thread overview: 11+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-12-07 8:06 Rename Shell buffer with current directory Sebastien Vauban
2013-12-07 20:58 ` Michael Heerdegen
[not found] ` <mailman.8479.1386449940.10748.help-gnu-emacs@gnu.org>
2013-12-08 20:36 ` Sebastien Vauban
2013-12-08 21:32 ` Michael Heerdegen
[not found] ` <mailman.8618.1386538352.10748.help-gnu-emacs@gnu.org>
2013-12-09 8:36 ` Sebastien Vauban
2013-12-09 9:36 ` Rainer M Krug
[not found] ` <52A58F09.1010409-vfylz/Ys1k4@public.gmane.org>
2013-12-09 12:22 ` Sebastien Vauban
2013-12-09 12:56 ` Rainer M Krug [this message]
2013-12-09 18:16 ` Michael Heerdegen
[not found] ` <mailman.8695.1386613044.10748.help-gnu-emacs@gnu.org>
2013-12-09 18:44 ` Sebastien Vauban
2013-12-09 19:31 ` Michael Heerdegen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=52A5BE06.8000605@krugs.de \
--to=rainer@krugs.de \
--cc=help-gnu-emacs@gnu.org \
--cc=sva-news@mygooglest.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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.