jflack/emacs-matlab
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

matlab-shell.el:

Browse source 
(matlab-find-other-window-file-line-column):
If input file fails to translate into a file name, issue a descriptive
error instead of passing nil to find-file-other-window.
This commit is contained in:
Eric Ludlam 2019-11-23 21:10:40 -05:00
parent 260d811f03
commit c200c243b4
1 changed files with 11 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
matlab-shell.el
View file

@ -1651,15 +1651,17 @@ something Emacs can load."
(defun matlab-find-other-window-file-line-column (ef el ec &optional debug)
"Find file EF in other window and to go line EL and 1-basec column EC.
If DEBUG is non-nil, then setup GUD debugging features."
(setq ef (matlab-shell-mref-to-filename ef))
(find-file-other-window ef)
(with-no-warnings
(goto-line (string-to-number el)))
(when debug
(setq gud-last-frame (cons (buffer-file-name) (string-to-number el)))
(gud-display-frame))
(setq ec (string-to-number ec))
(if (> ec 0) (forward-char (1- ec))))
(let ((ef-converted (matlab-shell-mref-to-filename ef)))
(when (not ef-converted)
(error "Failed to translate %s into a filename." ef))
(find-file-other-window ef-converted)
(with-no-warnings
(goto-line (string-to-number el)))
(when debug
(setq gud-last-frame (cons (buffer-file-name) (string-to-number el)))
(gud-display-frame))
(setq ec (string-to-number ec))
(if (> ec 0) (forward-char (1- ec)))))
(defun matlab-find-other-window-via-url (url &optional debug)
"Find other window using matlab URL and optionally set DEBUG cursor."