make tsfmt use config file
This commit is contained in:
parent
adebb01358
commit
bf4baf0646
|
@ -91,7 +91,11 @@
|
||||||
(progn
|
(progn
|
||||||
(with-current-buffer outputbuf (erase-buffer))
|
(with-current-buffer outputbuf (erase-buffer))
|
||||||
(write-region nil nil tmpfile)
|
(write-region nil nil tmpfile)
|
||||||
(if (zerop (apply 'call-process "tsfmt" nil outputbuf nil (list "--baseDir=." tmpfile)))
|
(if (zerop (apply 'call-process "tsfmt" nil outputbuf nil
|
||||||
|
(list (format
|
||||||
|
"--baseDir='%s' --"
|
||||||
|
default-directory)
|
||||||
|
tmpfile)))
|
||||||
(let ((p (point)))
|
(let ((p (point)))
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(with-current-buffer (current-buffer)
|
(with-current-buffer (current-buffer)
|
||||||
|
|
Loading…
Reference in a new issue