unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [C-delete] - should it not be backward-kill-word
@ 2006-07-04 21:44 Lennart Borgman
  2006-07-04 21:50 ` Drew Adams
                   ` (2 more replies)
  0 siblings, 3 replies; 8+ messages in thread
From: Lennart Borgman @ 2006-07-04 21:44 UTC (permalink / raw)


On w32 it looks like it is instead kill-word. [C-backspace] is wrong the 
other way.

I wrote this little test to check if key bindings are the default 
specified in bindings.el:

(with-temp-buffer
  (insert-file (locate-library "bindings.el"))
  (let ((rdk)
        (key)
        (fun))
    (while (condition-case err
               (setq rdk (read (current-buffer)))
             (error nil))
      (setq key nil)
      (cond ((and (eq (nth 0 rdk) 'define-key)
                  (eq (nth 1 rdk) 'global-map))
             (setq key (nth 2 rdk))
             (setq fun (nth 3 rdk))
             )
            ((eq (nth 0 rdk) 'global-set-key)
             (setq key (nth 1 rdk))
             (setq fun (nth 2 rdk))
             ))
      (when key
        (assert (eq (nth 0 fun) 'quote))
        (setq fun (nth 1 fun))
        (unless (or (eq (key-binding key) fun)
                    (eq (key-binding key) (command-remapping fun)))
          (message "from bindings.el: k=%s f=%s, but key-binding=%s" key 
fun (key-binding key)))
        ))))

^ permalink raw reply	[flat|nested] 8+ messages in thread

end of thread, other threads:[~2006-07-06 13:32 UTC | newest]

Thread overview: 8+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2006-07-04 21:44 [C-delete] - should it not be backward-kill-word Lennart Borgman
2006-07-04 21:50 ` Drew Adams
2006-07-05  2:04 ` Johan Bockgård
2006-07-05  3:30 ` Eli Zaretskii
2006-07-05  4:16   ` Lennart Borgman
2006-07-05  4:25     ` Miles Bader
2006-07-05 10:29       ` Mathias Dahl
2006-07-06 13:32       ` Richard Stallman

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).