Mercurial > emacs

comparison lisp/bindings.el @ 38409:153f1b1f2efd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Emacs lisp coding convention fixes.
author Pavel Janík <Pavel@Janik.cz>
date Sat, 14 Jul 2001 11:21:08 +0000
parents 4a7286bcdc6d
children 4d538c0a8afc
comparison
equal deleted inserted replaced
38408:621d2afcdfc2 38409:153f1b1f2efd
1 ;;; bindings.el --- define standard key bindings and some variables. 1 ;;; bindings.el --- define standard key bindings and some variables
2 2
3 ;; Copyright (C) 1985,86,87,92,93,94,95,96,99,2000, 2001 3 ;; Copyright (C) 1985,86,87,92,93,94,95,96,99,2000, 2001
4 ;; Free Software Foundation, Inc. 4 ;; Free Software Foundation, Inc.
5 5
6 ;; Maintainer: FSF 6 ;; Maintainer: FSF
615 (define-key global-map "\C-p" 'previous-line) 615 (define-key global-map "\C-p" 'previous-line)
616 (define-key ctl-x-map "\C-n" 'set-goal-column) 616 (define-key ctl-x-map "\C-n" 'set-goal-column)
617 617
618 ;;(defun function-key-error () 618 ;;(defun function-key-error ()
619 ;; (interactive) 619 ;; (interactive)
620 ;; (error "That function key is not bound to anything.")) 620 ;; (error "That function key is not bound to anything"))
621 621
622 (define-key global-map [menu] 'execute-extended-command) 622 (define-key global-map [menu] 'execute-extended-command)
623 (define-key global-map [find] 'search-forward) 623 (define-key global-map [find] 'search-forward)
624 624
625 ;; Don't do this. We define <delete> in function-key-map instead. 625 ;; Don't do this. We define <delete> in function-key-map instead.