[OS X Emacs] Aqua 1.4 buglet? aquamacs-backward-kill-word

[David Reitter]

Tim,

On 20 Jun 2008, at 00:13, Tim Bray wrote:

> Command-backspace is bound to this, and when I hit it and the mark
> isn't set, I get "The mark is not set now, so there is no region".
> Ordinary backward-kill-word doesn't seem to have this problem.  Easy
> workaround, just hit set-mark-command.  -T

I can't reproduce this, probably because I don't have your setup.

Does evaluating the following help -?

- David


(defun aquamacs-kill-word (&optional beg end arg)
   "Kill characters forward until encountering the end of a word.
With argument, do this that many times."
   (interactive "rp")
   (if (and transient-mark-mode mark-active beg end)
       (kill-region beg end)
     (kill-region (point) (progn (forward-word arg) (point)))))

(defun aquamacs-backward-kill-word (&optional beg end arg)
   "Kill characters backward until encountering the beginning of a word.
With argument, do this that many times."
   (interactive "rp")
   (aquamacs-kill-word beg end (- (or arg 1))))


--
http://aquamacs.org -- Aquamacs: Emacs on Mac OS X
http://aquamacs.org/donate -- Could we help you? Return the favor and  
support the Aquamacs Project!




-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 2193 bytes
Desc: not available
URL: <http://email.esm.psu.edu/pipermail/macosx-emacs/attachments/20080620/11be6183/attachment.p7s>