Explorar el Código

fix bug of isdcv-bol

pull/1/head
10sr hace 10 años
padre
commit
c61ce5251f
Se han modificado 1 ficheros con 7 adiciones y 2 borrados
  1. +7
    -2
      emacs.el

+ 7
- 2
emacs.el Ver fichero

@@ -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.


Cargando…
Cancelar
Guardar