all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: "Drew Adams" <drew.adams@oracle.com>
To: "'Tassilo Horn'" <tassilo@member.fsf.org>, <help-gnu-emacs@gnu.org>
Subject: RE: when deleting in minibuffer, don't change kill-ring
Date: Thu, 27 Oct 2011 14:53:31 -0700	[thread overview]
Message-ID: <2E5FB92AF4854B6CB7774F5D671C3320@us.oracle.com> (raw)
In-Reply-To: <87pqhiuwcy.fsf@thinkpad.tsdh.de>

> I guess the OP means `backward-kill-word' (<M-backspace>) and friends.
> I'm also interested in something like that.  I want to use the word,
> line, and region editing commands in the minibuffer, but I 
> don't want to have the killed text in the global kill-ring.

I think you need deleting (non-killing) commands to remap the killing commands
to:

(defun delete-word (arg)
  (interactive "p")
  (delete-region (point) (progn (forward-word arg) (point))))

(defun backward-delete-word (arg)
  (interactive "p")
  (delete-word (- arg)))

Then, as I said, bind these in _each_ of the minibuffer keymaps.  This is for
one of the maps:

(define-key minibuffer-local-must-match-map
    [remap kill-word] 'delete-word)

(define-key minibuffer-local-must-match-map
    [remap backward-kill-word] 'backward-delete-word)

> What I'd really like to have is a separate kill-ring for the
> minibuffers.  I've tried
> (dolist (b (buffer-list))
>   (when (minibufferp b)
>     (set-buffer b)
>     (make-local-variable 'kill-ring)))
> or entering a recursive edit
>   M-: M-: (make-local-variable 'kill-ring) RET C-g,
> but that doesn't have an effect. 

Try doing it on `minibuffer-setup-hook' instead.

(add-hook 'minibuffer-setup-hook'
          (lambda ()
            (make-local-variable 'kill-ring)))

> Isn't it possible to have buffer local values for
> variables defined at the C level?

Yes, AFAIK.




  parent reply	other threads:[~2011-10-27 21:53 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-10-27 16:35 when deleting in minibuffer, don't change kill-ring filebat Mark
2011-10-27 16:52 ` Drew Adams
2011-10-27 18:23   ` Tassilo Horn
2011-10-27 18:38     ` Peter Dyballa
2011-10-27 19:08       ` Tassilo Horn
2011-10-27 21:53     ` Drew Adams [this message]
2011-10-28  6:53       ` Tassilo Horn
2011-10-28  7:10         ` Tassilo Horn

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=2E5FB92AF4854B6CB7774F5D671C3320@us.oracle.com \
    --to=drew.adams@oracle.com \
    --cc=help-gnu-emacs@gnu.org \
    --cc=tassilo@member.fsf.org \
    /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.