branch: externals/idlwave commit 0845470474c61a779b6d533003ac658b8997fd18 Author: JD Smith <jdtsm...@gmail.com> Commit: JD Smith <jdtsm...@gmail.com>
Include arrow on stop line always. --- idlw-shell.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/idlw-shell.el b/idlw-shell.el index 6cd4990000..0f5e4e140d 100644 --- a/idlw-shell.el +++ b/idlw-shell.el @@ -2526,13 +2526,13 @@ matter what the settings of that variable." idlwave-shell-stop-line-face)) (move-overlay idlwave-shell-stop-line-overlay (point) (save-excursion (end-of-line) (point)) - (current-buffer))) - ;; use the arrow instead, but only if marking is wanted. - (if idlwave-shell-mark-stop-line - (setq overlay-arrow-string idlwave-shell-overlay-arrow)) - (or overlay-arrow-position ; create the marker if necessary - (setq overlay-arrow-position (make-marker))) - (set-marker overlay-arrow-position (point) buffer))) + (current-buffer)))) + ;; Always use the arrow + (if idlwave-shell-mark-stop-line + (setq overlay-arrow-string idlwave-shell-overlay-arrow)) + (or overlay-arrow-position ; create the marker if necessary + (setq overlay-arrow-position (make-marker))) + (set-marker overlay-arrow-position (point) buffer)) ;; if the point is outside the restriction, widen the buffer. (if (or (< pos (point-min)) (> pos (point-max)))