[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Native line numbers, final testing
From: |
James Nguyen |
Subject: |
Re: Native line numbers, final testing |
Date: |
Sun, 02 Jul 2017 20:22:34 -0700 |
Eli Zaretskii <address@hidden> writes:
> Are you sure this isn't a bug in evil-mode? Does this feature behave
> correctly in a buffer with a non-nil line-prefix?
>
> Can you show a backtrace from the args out of range error?
I haven't been keeping track of the line-prefix conversations around
this feature but setting it and then trying to do same thing (as
reported above) works in previous version of this line number branch.
(setq line-prefix "1")
16d2695674 * @ Minor change in NEWS.
^ This combination works.
Here's the trace on the latest commit.
4c9353a584 * scratch/line-numbers origin/scratch/line-numbers
Debugger entered--Lisp error: (args-out-of-range 1)
signal(args-out-of-range (1))
(condition-case err (let* ((range (evil-expand (point) (point) (quote line)))
(beg (evil-range-beginning range)) (end (evil-range-end range)) (min
(point-min)) (max (point-max))) (if (save-excursion (goto-char end) (bolp))
(progn (setq end (max beg (1- end))))) (if (and evil-move-cursor-back (not
evil-move-beyond-eol) (not (evil-visual-state-p)) (not
(evil-operator-state-p))) (progn (setq end (max beg (1- end)))))
(save-restriction (let ((evil-restriction-stack (cons (cons ... ...)
evil-restriction-stack))) (evil-narrow beg end) (let ((p (point)))
(condition-case err (progn (condition-case err ... ... ...)) (error (if ...
...))))))) (error (setq this-command last-command) (signal (car err) (cdr
err))))
(let ((evil-restriction-stack (cons (cons (point-min) (point-max))
evil-restriction-stack))) (evil-narrow (save-excursion (evil-backward-char (1+
(or count 1)) t t) (point)) (1+ (point))) (condition-case err (let* ((range
(evil-expand (point) (point) (quote line))) (beg (evil-range-beginning range))
(end (evil-range-end range)) (min (point-min)) (max (point-max))) (if
(save-excursion (goto-char end) (bolp)) (progn (setq end (max beg (1- end)))))
(if (and evil-move-cursor-back (not evil-move-beyond-eol) (not
(evil-visual-state-p)) (not (evil-operator-state-p))) (progn (setq end (max beg
(1- end))))) (save-restriction (let ((evil-restriction-stack (cons ...
evil-restriction-stack))) (evil-narrow beg end) (let ((p ...)) (condition-case
err (progn ...) (error ...)))))) (error (setq this-command last-command)
(signal (car err) (cdr err)))))
(save-restriction (let ((evil-restriction-stack (cons (cons (point-min)
(point-max)) evil-restriction-stack))) (evil-narrow (save-excursion
(evil-backward-char (1+ (or count 1)) t t) (point)) (1+ (point)))
(condition-case err (let* ((range (evil-expand (point) (point) (quote line)))
(beg (evil-range-beginning range)) (end (evil-range-end range)) (min
(point-min)) (max (point-max))) (if (save-excursion (goto-char end) (bolp))
(progn (setq end (max beg ...)))) (if (and evil-move-cursor-back (not
evil-move-beyond-eol) (not (evil-visual-state-p)) (not
(evil-operator-state-p))) (progn (setq end (max beg ...)))) (save-restriction
(let ((evil-restriction-stack ...)) (evil-narrow beg end) (let (...)
(condition-case err ... ...))))) (error (setq this-command last-command)
(signal (car err) (cdr err))))))
(cond (noerror (condition-case nil (evil-backward-char count crosslines nil)
(error nil))) ((not crosslines) (save-restriction (let ((evil-restriction-stack
(cons (cons ... ...) evil-restriction-stack))) (evil-narrow (save-excursion
(evil-backward-char (1+ ...) t t) (point)) (1+ (point))) (condition-case err
(let* ((range ...) (beg ...) (end ...) (min ...) (max ...)) (if (save-excursion
... ...) (progn ...)) (if (and evil-move-cursor-back ... ... ...) (progn ...))
(save-restriction (let ... ... ...))) (error (setq this-command last-command)
(signal (car err) (cdr err))))))) (t (let* ((countvar (or count 1)) (unitvar
(if (< countvar 0) -1 1))) (catch (quote donevar) (let ((loopvar countvar))
(setq loopvar loopvar) (while (/= loopvar 0) (let (...) (backward-char) (if ...
nil ...) (if ... ...)) (if (> loopvar 0) (setq loopvar ...) (setq loopvar ...))
(setq loopvar loopvar)) loopvar)))))
evil-backward-char(nil nil nil)
funcall-interactively(evil-backward-char nil nil nil)
call-interactively(evil-backward-char nil nil)
command-execute(evil-backward-char)
- Re: Native line numbers, final testing, (continued)
- Re: Native line numbers, final testing, Alex, 2017/07/29
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/29
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/07
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/07
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/07
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/07
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/07
- Message not available
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/07
- Re: Native line numbers, final testing, James Nguyen, 2017/07/02
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/02
- Re: Native line numbers, final testing,
James Nguyen <=
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/03
- Re: Native line numbers, final testing, James Nguyen, 2017/07/03
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/04
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/04
- Re: Native line numbers, final testing, Kaushal Modi, 2017/07/04
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/04
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/04
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/04
- Re: Native line numbers, final testing, Filipe Silva, 2017/07/04
- Re: Native line numbers, final testing, Eli Zaretskii, 2017/07/04