haskal
/
utop
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Print only OCaml preprocessor message loaded if it was really loaded 

Ignore-this: b96ea788d929cf7dbb853adfa59e4213

darcs-hash:20120731235343-33bd9-711df107c2b3b4580c0c37fe8271e732a4caeada
This commit is contained in:
wojciech.meyer 2012-08-01 01:53:43 +02:00
parent e4796c8e51
commit 718fb69db1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/top/utop.el
View File

@ -1002,8 +1002,8 @@ defaults to 0."
"Perform actions defined by local variables"
(when utop-ocaml-preprocessor
(with-current-buffer (utop))
(utop-eval-string (format "#%s" utop-ocaml-preprocessor)))
(message (format "uTop: %s preprocessor loaded" utop-ocaml-preprocessor))
(utop-eval-string (format "#%s" utop-ocaml-preprocessor))
(message (format "uTop: %s OCaml preprocessor loaded" utop-ocaml-preprocessor)))
(utop-query-load-package-list))
;; +-----------------------------------------------------------------+