Commit 9ee12eee authored by Tassilo Horn's avatar Tassilo Horn
Browse files

* progmodes/subword.el (subword-mode-map): Fix subword-mode-map

	generation from word-movement command names.
parent 8b264ecb
2009-11-22 Tassilo Horn <tassilo@member.fsf.org>
* progmodes/subword.el (subword-mode-map): Fix subword-mode-map
generation from word-movement command names.
2009-11-21 Chong Yidong <cyd@stupidchicken.com>
* cedet/semantic/complete.el (semantic-complete-read-tag-engine)
......
......@@ -86,10 +86,8 @@
backward-kill-word transpose-words
capitalize-word upcase-word downcase-word))
(let ((othercmd (let ((name (symbol-name cmd)))
(string-match "\\(.*-\\)\\(word.*\\)" name)
(intern (concat (match-string 1 name)
"sub"
(match-string 2 name))))))
(string-match "\\([[:alpha:]-]+\\)-word[s]?" name)
(intern (concat "subword-" (match-string 1 name))))))
(define-key map (vector 'remap cmd) othercmd)))
map)
"Keymap used in `subword-mode' minor mode.")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment