GNU bug report logs -
#17482
args-out-of-range when visiting foo.todo
Previous Next
Reported by: Glenn Morris <rgm <at> gnu.org>
Date: Tue, 13 May 2014 06:23:02 UTC
Severity: important
Found in version 24.3.91
Done: Stephen Berman <stephen.berman <at> gmx.net>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Your message dated Fri, 23 May 2014 21:12:58 +0200
with message-id <87fvk0mhqd.fsf <at> rosalinde.fritz.box>
and subject line Re: bug#17482: args-out-of-range when visiting foo.todo
has caused the debbugs.gnu.org bug report #17482,
regarding args-out-of-range when visiting foo.todo
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs <at> gnu.org.)
--
17482: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=17482
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
Package: emacs
Version: 24.3.91
Severity: important
emacs -Q
C-x C-f /tmp/foo.todo
-> args-out-of-range error
(.todo is a pretty generic extension for me. I don't want it to open a
specialized Emacs mode. I don't feel strongly about it though.
Perhaps the NEWS file should say that .todo files now open in todo-mode.
They didn't before.)
Debugger entered--Lisp error: (args-out-of-range 1 2)
narrow-to-region(2 1)
(let ((name (todo-current-category)) cat-begin cat-end done-start done-sep-start done-end) (widen) (goto-char (point-min)) (re-search-forward (concat "^" (regexp-quote (concat todo-category-beg name)) "$") nil t) (setq cat-begin (1+ (line-end-position))) (setq cat-end (if (re-search-forward (concat "^" (regexp-quote todo-category-beg)) nil t) (match-beginning 0) (point-max))) (setq mode-line-buffer-identification (funcall todo-mode-line-function name)) (narrow-to-region cat-begin cat-end) (todo-prefix-overlays) (goto-char (point-min)) (if (re-search-forward (concat "\n\\(" (regexp-quote todo-category-done) "\\)") nil t) (progn (setq done-start (match-beginning 0)) (setq done-sep-start (match-beginning 1)) (setq done-end (match-end 0))) (error "Category %s is missing todo-category-done string" name)) (if todo-show-done-only (narrow-to-region (1+ done-end) (point-max)) (if (and todo-show-with-done (re-search-forward todo-done-string-start nil t)) (progn (setq done-start cat-end) (let* ((done-sep todo-done-separator) (ov (progn ... ...))) (if ov nil (setq ov (make-overlay done-sep-start done-end)) (overlay-put ov (quote todo) (quote separator)) (overlay-put ov (quote display) done-sep))))) (narrow-to-region (point-min) done-start) (if todo-highlight-item (progn (require (quote hl-line)) (hl-line-mode 1)))))
todo-category-select()
(and (member this-command todo-visit-files-commands) (= (- (point-max) (point-min)) (buffer-size)) (member major-mode (quote (todo-mode todo-archive-mode))) (todo-category-select))
todo-display-as-todo-file()
run-hooks(find-file-hook)
after-find-file(t t)
find-file-noselect-1(#<buffer foo.todo> "/tmp/foo.todo" nil nil "/tmp/foo.todo" nil)
find-file-noselect("/tmp/foo.todo" nil nil t)
find-file("/tmp/foo.todo" t)
call-interactively(find-file nil nil)
command-execute(find-file)
[Message part 3 (message/rfc822, inline)]
On Fri, 23 May 2014 13:32:48 -0400 Glenn Morris <rgm <at> gnu.org> wrote:
> Well, I visited foo.todo and no longer saw an error, so works for me,
> thanks.
Thanks for confirming; closing.
Steve Berman
This bug report was last modified 11 years and 3 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.