[MLton-commit] r6706

[Vesa Karvonen]

Use `insert-file-contents' rather than `insert-file', which is intended
for interactive use.

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

U   mlton/trunk/ide/emacs/esml-du-mlton.el

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

Modified: mlton/trunk/ide/emacs/esml-du-mlton.el
===================================================================
--- mlton/trunk/ide/emacs/esml-du-mlton.el	2008-08-19 17:14:15 UTC (rev 6705)
+++ mlton/trunk/ide/emacs/esml-du-mlton.el	2008-08-19 18:29:00 UTC (rev 6706)
@@ -421,7 +421,7 @@
             (esml-du-ctx-set-buf nil ctx)))))))
   (bury-buffer (esml-du-ctx-buf ctx))
   (with-current-buffer (esml-du-ctx-buf ctx)
-    (insert-file (esml-du-ctx-duf ctx))
+    (insert-file-contents (esml-du-ctx-duf ctx))
     (setq buffer-read-only t)
     (goto-char 1))
   (clrhash (esml-du-ctx-ref-to-sym-table ctx))