comparison lisp/progmodes/idlw-shell.el @ 70573:b79a60a5fdeb

(idlwave-shell-move-or-history): Remove spurious move to point-max (new comint behavior fixes).

70572:d6353257b05e

	 (arg (or arg 1))
	 (arg (if up arg (- arg))))
    (if (eq t idlwave-shell-arrows-do-history) (goto-char proc-pos))
    (if (and idlwave-shell-arrows-do-history
	     (>= (1+ (save-excursion (end-of-line) (point))) proc-pos))
	(progn
	  ;;(goto-char proc-pos)
	  (goto-char (point-max))
	  ;;(and (not (eolp)) (kill-line nil))
	  (comint-previous-input arg))
      (previous-line arg))))

(defun idlwave-shell-up-or-history (&optional arg)
"When in last line of process buffer, move to previous input.
 Otherwise just go up one line."

70573:b79a60a5fdeb

	 (arg (or arg 1))
	 (arg (if up arg (- arg))))
    (if (eq t idlwave-shell-arrows-do-history) (goto-char proc-pos))
    (if (and idlwave-shell-arrows-do-history
	     (>= (1+ (save-excursion (end-of-line) (point))) proc-pos))
	(comint-previous-input arg)
      (previous-line arg))))

(defun idlwave-shell-up-or-history (&optional arg)
"When in last line of process buffer, move to previous input.
 Otherwise just go up one line."