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 bug report
#17482: args-out-of-range when visiting foo.todo
which was filed against the emacs package, has been closed.
The explanation is attached below, along with your original report.
If you require more details, please reply to 17482 <at> debbugs.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)]
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
[Message part 3 (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)
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.