Mercurial > emacs
comparison lisp/textmodes/reftex-sel.el @ 69177:a4c2155cc832
(reftex-select-label-map,
reftex-select-bib-map): Add `follow-mouse' binding.
author | Carsten Dominik <dominik@science.uva.nl> |
---|---|
date | Mon, 27 Feb 2006 07:41:18 +0000 |
parents | bfd5c5e60410 |
children | 0b524ec529e1 5754737d1e04 |
comparison
equal
deleted
inserted
replaced
69176:eb8a077cb76b | 69177:a4c2155cc832 |
---|---|
683 do (define-key map (car x) (cdr x))) | 683 do (define-key map (car x) (cdr x))) |
684 | 684 |
685 ;; The mouse-2 binding | 685 ;; The mouse-2 binding |
686 (if (featurep 'xemacs) | 686 (if (featurep 'xemacs) |
687 (define-key map [(button2)] 'reftex-select-mouse-accept) | 687 (define-key map [(button2)] 'reftex-select-mouse-accept) |
688 (define-key map [(mouse-2)] 'reftex-select-mouse-accept)) | 688 (define-key map [(mouse-2)] 'reftex-select-mouse-accept) |
689 (define-key map [follow-link] 'mouse-face)) | |
690 | |
689 | 691 |
690 ;; Digit arguments | 692 ;; Digit arguments |
691 (loop for key across "0123456789" do | 693 (loop for key across "0123456789" do |
692 (define-key map (vector (list key)) 'digit-argument)) | 694 (define-key map (vector (list key)) 'digit-argument)) |
693 (define-key map "-" 'negative-argument) | 695 (define-key map "-" 'negative-argument) |