Browse Source

fix bug of isdcv-bol

pull/1/head
10sr 10 years ago
parent
commit
c61ce5251f
1 changed files with 7 additions and 2 deletions
  1. +7
    -2
      emacs.el

+ 7
- 2
emacs.el View File

@@ -2333,6 +2333,9 @@ this is test, does not rename files."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; isdcv

;; TODO: remove dependant of sdcv, and change the name to something like
;; `ilookup`

(defvar isdcv-prompt "> "
"Prompt string for isdcv input.")

@@ -2410,8 +2413,10 @@ Freeze current input and show next prompt."
"Return point to bol ignoring prompt."
(save-excursion
(beginning-of-line)
(search-forward isdcv-prompt
(point-at-eol))))
(or (search-forward isdcv-prompt
(point-at-eol)
t)
(point))))

(defun isdcv--get-output-start ()
"Return point where outputs should be inserted.


Loading…
Cancel
Save