[MLton-commit] r6791

[Vesa Karvonen]

Made interactive to make testing more convenient.

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

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	2008-08-23 16:10:57 UTC (rev 6790)
+++ mlton/trunk/ide/emacs/def-use-mode.el	2008-08-23 21:29:29 UTC (rev 6791)
@@ -425,6 +425,7 @@
 
 (defun def-use-highlight-current ()
   "Highlights the symbol at the point."
+  (interactive)
   (save-excursion
     (save-window-excursion
       (def-use-highlight-sym (def-use-current-sym t)))))