[MLton-commit] r5091

[Vesa Karvonen]

Minor usability tweaks.

----------------------------------------------------------------------

U   mlton/trunk/ide/emacs/def-use-mode.el

----------------------------------------------------------------------

Modified: mlton/trunk/ide/emacs/def-use-mode.el
===================================================================
--- mlton/trunk/ide/emacs/def-use-mode.el	2007-01-30 17:07:30 UTC (rev 5090)
+++ mlton/trunk/ide/emacs/def-use-mode.el	2007-01-30 17:39:45 UTC (rev 5091)
@@ -145,14 +145,15 @@
         (set-buffer buffer)
         (insert "References to " title "\n"
                 "\n"
-                (def-use-format-ref (def-use-sym-ref sym)) "\n")
+                (def-use-format-ref (def-use-sym-ref sym)) "\n"
+                "\n")
         (let* ((refs (def-use-all-refs-sorted sym))
                (refs (if reverse (reverse refs) refs)))
           (mapc (function
                  (lambda (ref)
                    (insert (def-use-format-ref ref) "\n")))
                 refs))
-        (goto-char 0)
+        (goto-line 5)
         (pop-to-buffer buffer)
         (local-set-key "q" 'def-use-kill-current-buffer)
         (local-set-key "o" 'def-use-list-jump-to-ref-on-current-line)