michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix(emacs/lean-mode): pass lean-options to lean-execute

Browse source 
Related issue: #196
This commit is contained in:
Soonho Kong 2014-09-15 09:47:00 -07:00
parent 75ab5e07d6
commit ff6862f587
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/emacs/lean-mode.el
View file

@ -39,7 +39,10 @@
(defun lean-execute (&optional arg) (defun lean-execute (&optional arg)
"Execute Lean in the current buffer" "Execute Lean in the current buffer"
(interactive "sarg: ") (interactive)
(setq arg (concat (lean-option-string) " " arg))
(when (called-interactively-p)
(setq arg (read-string "arg: " arg)))
(let ((target-file-name (let ((target-file-name
(or (or
(buffer-file-name) (buffer-file-name)