[OS X Emacs] Aquamacs 1.8 intermittent problems with command-C
david.reitter at gmail.com
Tue Jul 21 05:41:26 EDT 2009
I reverted the change below, made in 1.8, in order to address this
There will be an Aquamacs 1.9 eventually to incorporate this and other
\item Command-C (clipboard-kill-ring-save) will take care not to
create duplicate entries in the kill ring.
Reported by Konrad Podczeck.
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!
On Jul 20, 2009, at 6:51 PM, Tom Van Vleck wrote:
> I installed that change into Preferences.el and restarted Aquamacs.
> It still fails. The A-v in the lossage below does not paste
> the contents of the text highlighted by drag-mouse-1.
> If anything, this change makes things worse. It used to be that
> re-highlighting the copy region would allow cmd-c to work, but
> now it still fails after re-highlighting.
> <mouse-movement> <mouse-movement> <drag-mouse-1> A-c
> <down-mouse-1> <mouse-1> A-v A-z <down-mouse-1> <mouse-movement>
> <mouse-movement> <drag-mouse-1> A-c <down-mouse-1>
> <mouse-1> A-v A-z M-x v i e w - l o s s a g e <return>
> On Jul 20, 2009, at 1:04 PM, David Reitter wrote:
>> On Jul 20, 2009, at 2:35 PM, Tom Van Vleck wrote:
>>> Ever since Aquamacs 1.8 came out,
>>> I have noticed intermittent problems with
>>> highlighting text and doing Command-C to copy it.
>> seems like this is related to a change in version 1.8.
>> Please try the code below in your Preferences.el / .emacs and let
>> me know if that fixes things for you.
>> Thanks for reporting this
>> - David
>> 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!
>> (when (< aquamacs-version-id 183)
>> (defun clipboard-kill-ring-save (beg end)
>> "Copy region to kill ring, and save in the X clipboard.
>> Do not copy region to kill ring if that would
>> result in a duplicate entry."
>> (interactive "r")
>> (when (or (not transient-mark-mode) mark-active)
>> (let ((x-select-enable-clipboard t))
>> (kill-ring-save beg end)
>> (when (equal (car kill-ring) (cadr kill-ring))
>> (setq kill-ring (cdr kill-ring))
>> (if (fboundp 'menu-bar-update-yank-menu)
>> (menu-bar-update-yank-menu (car kill-ring) nil)))))))
>> MacOSX-Emacs mailing list
>> MacOSX-Emacs at email.esm.psu.edu
>> List Archives: http://dir.gmane.org/gmane.emacs.macintosh.osx
> MacOSX-Emacs mailing list
> MacOSX-Emacs at email.esm.psu.edu
> List Archives: http://dir.gmane.org/gmane.emacs.macintosh.osx
-------------- next part --------------
A non-text attachment was scrubbed...
Size: 2193 bytes
Desc: not available
More information about the MacOSX-Emacs