mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

Fix error preloading bindings.el.

Browse Source 
lisp/bindings.el (search-map): Fix last change: don't use 'kbd' in
 bindings.el, since it is not yet loaded when bindings.el is preloaded.
This commit is contained in:
Eli Zaretskii 2014-11-14 08:14:06 +02:00
parent 5d977b968c
commit 3e517d349b
2 changed files with 15 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2014-11-14 Eli Zaretskii <eliz@gnu.org>
* bindings.el (search-map): Fix last change: don't use 'kbd' in
bindings.el, since it is not yet loaded when bindings.el is
preloaded.
2014-11-14 Fabián Ezequiel Gallina <fgallina@gnu.org> 2014-11-14 Fabián Ezequiel Gallina <fgallina@gnu.org>
* progmodes/python.el (python-shell-completion-get-completions): * progmodes/python.el (python-shell-completion-get-completions):

18
lisp/bindings.el
View File

@ -925,15 +925,15 @@ if `inhibit-field-text-motion' is non-nil."
"Keymap for search related commands.") "Keymap for search related commands.")
(define-key esc-map "s" search-map) (define-key esc-map "s" search-map)
(define-key search-map "o" 'occur) (define-key search-map "o" 'occur)
(define-key search-map (kbd "M-s") 'eww-search-words) (define-key search-map "\M-s" 'eww-search-words)
(define-key search-map "hr" 'highlight-regexp) (define-key search-map "hr" 'highlight-regexp)
(define-key search-map "hp" 'highlight-phrase) (define-key search-map "hp" 'highlight-phrase)
(define-key search-map "hl" 'highlight-lines-matching-regexp) (define-key search-map "hl" 'highlight-lines-matching-regexp)
(define-key search-map "h." 'highlight-symbol-at-point) (define-key search-map "h." 'highlight-symbol-at-point)
(define-key search-map "hu" 'unhighlight-regexp) (define-key search-map "hu" 'unhighlight-regexp)
(define-key search-map "hf" 'hi-lock-find-patterns) (define-key search-map "hf" 'hi-lock-find-patterns)
(define-key search-map "hw" 'hi-lock-write-interactive-patterns) (define-key search-map "hw" 'hi-lock-write-interactive-patterns)
;;(defun function-key-error () ;;(defun function-key-error ()
;; (interactive) ;; (interactive)