GNU bug report logs - #28930
24.5; cua-mode does not replace keyboard shortcuts in Edit menu

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 28930 in the body.
You can then email your comments to 28930 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Bruno Haible <bruno <at> clisp.org>
To: bug-gnu-emacs <at> gnu.org
Subject: 24.5%3B cua-mode does not replace keyboard shortcuts in Edit menu
Date: Sat, 21 Oct 2017 21:28:04 +0200

Someone has this customization in his ~/.emacs file:%0D%0A  %28cua-mode 1%29%0D%0A%0D%0AThis has the effect of enabling CUA mode. But the user is not%0D%0Aaware of it%2C because the Edit menu displays:%0D%0A%0D%0A  Undo  C-x u%0D%0A  Cut   C-w%0D%0A  Copy  M-w%0D%0A%0D%0AAs a consequence%2C the user does not feel familiar with this%0D%0Aeditor and does not dare to use the keystrokes he%27s familar with%0D%0A%28Ctrl-C for Copy etc.%29.%0D%0A%0D%0ASuggestion: Make the Edit menu display%0D%0A%0D%0A  Undo  C-z%0D%0A  Cut   C-x%0D%0A  Copy  C-c%0D%0A%0D%0AThen the user would feel familiar and could use these%0D%0Akeybindings without thinking about them.%0D%0A%0D%0A%0D%0AIn GNU Emacs 24.5.1 %28x86_64-pc-linux-gnu%2C GTK%2B Version 3.18.9%29%0D%0A of 2017-09-20 on lcy01-07%2C modified by Debian%0D%0AWindowing system distributor `The X.Org Foundation%27%2C version 11.0.11804000%0D%0ASystem Description:%09Ubuntu 16.04.1 LTS%0D%0A%0D%0AConfigured using:%0D%0A `configure --build x86_64-linux-gnu --prefix=/usr%0D%0A --sharedstatedir=/var/lib --libexecdir=/usr/lib%0D%0A --localstatedir=/var/lib --infodir=/usr/share/info%0D%0A --mandir=/usr/share/man --with-pop=yes%0D%0A --enable-locallisppath=/etc/emacs24:/etc/emacs:/usr/local/share/emacs/24.5/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/24.5/site-lisp:/usr/share/emacs/site-lisp%0D%0A --build x86_64-linux-gnu --prefix=/usr --sharedstatedir=/var/lib%0D%0A --libexecdir=/usr/lib --localstatedir=/var/lib%0D%0A --infodir=/usr/share/info --mandir=/usr/share/man --with-pop=yes%0D%0A --enable-locallisppath=/etc/emacs24:/etc/emacs:/usr/local/share/emacs/24.5/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/24.5/site-lisp:/usr/share/emacs/site-lisp%0D%0A --with-x=yes --with-x-toolkit=gtk3 --with-toolkit-scroll-bars%0D%0A %27CFLAGS=-g -O2 -fstack-protector-strong -Wformat%0D%0A -Werror=format-security -Wall%27 %27CPPFLAGS=-Wdate-time%0D%0A -D_FORTIFY_SOURCE=2%27 %27LDFLAGS=-Wl%2C-Bsymbolic-functions -Wl%2C-z%2Crelro%27%27%0D%0A%0D%0AImportant settings:%0D%0A  value of %24LC_MONETARY: de_DE.UTF-8%0D%0A  value of %24LC_NUMERIC: de_DE.UTF-8%0D%0A  value of %24LC_TIME: de_DE.UTF-8%0D%0A  value of %24LANG: de_DE.UTF-8%0D%0A  locale-coding-system: utf-8-unix%0D%0A%0D%0AMajor mode: Lisp Interaction%0D%0A%0D%0AMinor modes in effect:%0D%0A  delete-selection-mode: t%0D%0A  cua-mode: t%0D%0A  tooltip-mode: t%0D%0A  mouse-wheel-mode: t%0D%0A  tool-bar-mode: t%0D%0A  menu-bar-mode: t%0D%0A  file-name-shadow-mode: t%0D%0A  global-font-lock-mode: t%0D%0A  font-lock-mode: t%0D%0A  auto-composition-mode: t%0D%0A  auto-encryption-mode: t%0D%0A  auto-compression-mode: t%0D%0A  line-number-mode: t%0D%0A  transient-mark-mode: t%0D%0A%0D%0ARecent messages:%0D%0ALoading /var/cache/dictionaries-common/emacsen-ispell-dicts.el %28source%29...done%0D%0ALoading /etc/emacs/site-start.d/50dictionaries-common.el %28source%29...done%0D%0ALoading /etc/emacs/site-start.d/50python-docutils.el %28source%29...done%0D%0AFor information about GNU Emacs and the GNU system%2C type C-h C-a.%0D%0AMaking completion list...%0D%0AQuit%0D%0ACUA mode disabled.%0D%0ACua mode enabled%0D%0AQuit%0D%0AMaking completion list...%0D%0A%0D%0ALoad-path shadows:%0D%0A/usr/share/emacs/24.5/site-lisp/debian-startup hides /usr/share/emacs/site-lisp/debian-startup%0D%0A/usr/share/emacs24/site-lisp/cmake-data/cmake-mode hides /usr/share/emacs/site-lisp/cmake-mode%0D%0A/usr/share/emacs/site-lisp/rst hides /usr/share/emacs/24.5/lisp/textmodes/rst%0D%0A%0D%0AFeatures:%0D%0A%28shadow sort gnus-util mail-extr emacsbug message format-spec rfc822 mml%0D%0Amml-sec mm-decode mm-bodies mm-encode mail-parse rfc2231 mailabbrev%0D%0Agmm-utils mailheader sendmail rfc2047 rfc2045 ietf-drums mm-util%0D%0Ahelp-fns mail-prsvr mail-utils cus-start cus-load help-mode easymenu%0D%0Adelsel cua-base time-date tooltip electric uniquify ediff-hook vc-hooks%0D%0Alisp-float-type mwheel x-win x-dnd tool-bar dnd fontset image regexp-opt%0D%0Afringe tabulated-list newcomment lisp-mode prog-mode register page%0D%0Amenu-bar rfn-eshadow timer select scroll-bar mouse jit-lock font-lock%0D%0Asyntax facemenu font-core frame cham georgian utf-8-lang misc-lang%0D%0Avietnamese tibetan thai tai-viet lao korean japanese hebrew greek%0D%0Aromanian slovak czech european ethiopic indian cyrillic chinese%0D%0Acase-table epa-hook jka-cmpr-hook help simple abbrev minibuffer nadvice%0D%0Aloaddefs button faces cus-face macroexp files text-properties overlay%0D%0Asha1 md5 base64 format env code-pages mule custom widget%0D%0Ahashtable-print-readable backquote make-network-process dbusbind%0D%0Agfilenotify dynamic-setting system-font-setting font-render-setting%0D%0Amove-toolbar gtk x-toolkit x multi-tty emacs%29%0D%0A%0D%0AMemory information:%0D%0A%28%28conses 16 83203 6129%29%0D%0A %28symbols 48 18758 0%29%0D%0A %28miscs 40 40 74%29%0D%0A %28strings 32 11287 3748%29%0D%0A %28string-bytes 1 294567%29%0D%0A %28vectors 16 9191%29%0D%0A %28vector-slots 8 385762 15172%29%0D%0A %28floats 8 69 120%29%0D%0A %28intervals 56 230 1%29%0D%0A %28buffers 960 12%29%0D%0A %28heap 1024 47156 969%29%29%0D%0A

Message #16 received at 28930 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Bruno Haible <bruno <at> clisp.org>
Cc: 28931 <at> debbugs.gnu.org, 28930 <at> debbugs.gnu.org
Subject: Re: bug#28930: 24.5; cua-mode does not replace keyboard shortcuts
 in Edit menu
Date: Fri, 02 Jul 2021 17:40:41 +0200

Bruno Haible <bruno <at> clisp.org> writes:

> Someone has this customization in his ~/.emacs file:
>   (cua-mode 1)
>
> This has the effect of enabling CUA mode. But the user is not
> aware of it, because the Edit menu displays:
>
>   Undo  C-x u
>   Cut   C-w
>   Copy  M-w
>
> As a consequence, the user does not feel familiar with this
> editor and does not dare to use the keystrokes he's familar with
> (Ctrl-C for Copy etc.).
>
> Suggestion: Make the Edit menu display
>
>   Undo  C-z
>   Cut   C-x
>   Copy  C-c
>
> Then the user would feel familiar and could use these
> keybindings without thinking about them.

(I'm going through old bug reports that unfortunately got little response at
the time.)

Let's see...  this is from this stuff:

    (bindings--define-key menu [copy]
      ;; ns-win.el said: Substitute a Copy function that works better
      ;; under X (for GNUstep).
      `(menu-item "Copy" ,(if (featurep 'ns)
                              'ns-copy-including-secondary
                            'kill-ring-save)
                  :enable mark-active
                  :help "Copy text in region between mark and current position"
                  :keys ,(if (featurep 'ns)
                             "\\[ns-copy-including-secondary]"
                           "\\[kill-ring-save]")))

(etc)

I guess we could add a case for cua-mode in the :keys here, too?  I've
never ever used cua-mode myself, though...  C-x and C-x only work when
the region is active in cua-mode, I think?  So...  would it be accurate
to put them in the menu?  I mean, we could check for an active region,
too, but would that be confusing?

Anybody have an opinion here?

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Message #21 received at 28930 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Bruno Haible <bruno <at> clisp.org>
Cc: 28931 <at> debbugs.gnu.org, 28930 <at> debbugs.gnu.org
Subject: Re: bug#28930: 24.5; cua-mode does not replace keyboard shortcuts
 in Edit menu
Date: Sat, 31 Jul 2021 18:19:49 +0200

Lars Ingebrigtsen <larsi <at> gnus.org> writes:

> Let's see...  this is from this stuff:
>
>     (bindings--define-key menu [copy]
>       ;; ns-win.el said: Substitute a Copy function that works better
>       ;; under X (for GNUstep).
>       `(menu-item "Copy" ,(if (featurep 'ns)
>                               'ns-copy-including-secondary
>                             'kill-ring-save)
>                   :enable mark-active
>                   :help "Copy text in region between mark and current position"
>                   :keys ,(if (featurep 'ns)
>                              "\\[ns-copy-including-secondary]"
>                            "\\[kill-ring-save]")))
>
> (etc)
>
> I guess we could add a case for cua-mode in the :keys here, too?

No, we can't -- that has to be computed dynamically, and :keys doesn't
allow that.  I think?

I tried to use :filter, but it couldn't figure out how to use that to
return a dynamically generated menu item -- is that even possible?

Perhaps we should just allow :keys to be a lambda?  Any opinions?

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Message #26 received at 28930 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Bruno Haible <bruno <at> clisp.org>
Cc: 28931 <at> debbugs.gnu.org, 28930 <at> debbugs.gnu.org
Subject: Re: bug#28930: 24.5; cua-mode does not replace keyboard shortcuts
 in Edit menu
Date: Mon, 11 Oct 2021 13:18:31 +0200

Lars Ingebrigtsen <larsi <at> gnus.org> writes:

> Perhaps we should just allow :keys to be a lambda?  Any opinions?

Nobody had an opinion in ten weeks, so I went ahead and implemented it
(and fixed the keyboard shortcuts in the Edit menu).

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.