]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/textmodes/rst.el (rst-toc-link-keymap): Move before first use.
authorTom Tromey <tom@tromey.com>
Fri, 7 Apr 2017 15:43:42 +0000 (09:43 -0600)
committerTom Tromey <tom@tromey.com>
Fri, 7 Apr 2017 15:44:46 +0000 (09:44 -0600)
lisp/textmodes/rst.el

index 7fad83da6be04ab694a8d78d8e4c52d46750eca5..1820254542305bb598a387a303f16e41a82d6963 100644 (file)
@@ -2711,6 +2711,12 @@ indentation style:
   :group 'rst-toc)
 (rst-testcover-defcustom)
 
+(defconst rst-toc-link-keymap
+  (let ((map (make-sparse-keymap)))
+       (define-key map [mouse-1] 'rst-toc-mouse-follow-link)
+       map)
+  "Keymap used for links in TOC.")
+
 (defun rst-toc-insert (&optional max-level)
   ;; testcover: ok.
   "Insert the table of contents of the current section at the current column.
@@ -2773,12 +2779,6 @@ If KEYMAP use this as keymap property.  PFX is inserted before text."
       (error "Buffer for this section was killed"))
     mrkr))
 
-(defconst rst-toc-link-keymap
-  (let ((map (make-sparse-keymap)))
-       (define-key map [mouse-1] 'rst-toc-mouse-follow-link)
-       map)
-  "Keymap used for links in TOC.")
-
 (defun rst-toc-insert-tree (stn buf style depth keymap tgt-stn)
   ;; testcover: ok.
   "Insert table of contents of tree below top node STN in buffer BUF.