From 6c93a0c5612190566ae65f8654cca509e1a0e0d7 Mon Sep 17 00:00:00 2001 From: Marko Schuetz-Schmuck Date: Thu, 5 May 2016 15:50:00 -0400 Subject: Streamline callout to emacs for HTML rendering. --- src/demo.sml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/demo.sml') diff --git a/src/demo.sml b/src/demo.sml index 17de80ee..2ff76ad1 100644 --- a/src/demo.sml +++ b/src/demo.sml @@ -318,12 +318,13 @@ fun make' {prefix, dirname, guided} = Posix.FileSys.ST.mtime htmlSt) end handle OS.SysErr _ => true - val cmd = "emacs --eval \"(progn " + val cmd = "emacs -no-init-file --eval \"(progn " ^ "(global-font-lock-mode t) " ^ "(add-to-list 'load-path \\\"" ^ !Settings.configSitelisp ^ "/\\\") " ^ "(load \\\"urweb-mode-startup\\\") " + ^ "(load \\\"htmlize\\\") " ^ "(urweb-mode) " ^ "(find-file \\\"" ^ src -- cgit v1.2.3