bug#3391: 23.0.93; bookmarks-jump only works on second try

bug#3391: 23.0.93; bookmarks-jump only works on second try

[henry atting]

Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the emacs-pretest-bug@gnu.org mailing list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

When trying to open a file with bookmark-jump the first try results in
an error message like this:

Loading bookmark...done
Fontifying .emacs.bmk... (regexps...)
string-match: Wrong type argument: symbolp,
("org-remember-last-stored" (filename . "~/notes.org")
(front-context-string . "** [2009-05-26 D") (rear-context-string . "
Di 14:52] test ") (position . 2403))

From the second try on it works without problems - as long as emacs is
started anew.


If Emacs crashed, and you have the Emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
/usr/share/emacs/23.0.93/etc/DEBUG for instructions.


In GNU Emacs 23.0.93.1 (i486-pc-linux-gnu, GTK+ Version 2.16.1)
 of 2009-05-02 on thallium, modified by Debian
 (emacs-snapshot package, version 1:20090501-1~jaunty1)
Windowing system distributor `The X.Org Foundation', version 11.0.10600000
configured using `configure  '--build' 'i486-linux-gnu' '--host' 'i486-linux-gnu' '--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib' '--localstatedir=/var' '--infodir=/usr/share/info' '--mandir=/usr/share/man' '--with-pop=yes' '--enable-locallisppath=/etc/emacs-snapshot:/etc/emacs:/usr/local/share/emacs/23.0.93/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/23.0.93/site-lisp:/usr/share/emacs/site-lisp' '--with-x=yes' '--with-x-toolkit=gtk' 'build_alias=i486-linux-gnu' 'host_alias=i486-linux-gnu' 'CFLAGS=-DDEBIAN -DSITELOAD_PURESIZE_EXTRA=5000 -g -O2' 'LDFLAGS=-g -Wl,--as-needed' 'CPPFLAGS=''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: de_DE.UTF-8
  value of $XMODIFIERS: nil
  locale-coding-system: utf-8-unix
  default-enable-multibyte-characters: t

Major mode: Fundamental

Minor modes in effect:
  window-numbering-mode: t
  recentf-mode: t
  erc-track-mode: t
  erc-ring-mode: t
  erc-notify-mode: t
  erc-netsplit-mode: t
  erc-menu-mode: t
  erc-log-mode: t
  erc-list-mode: t
  erc-pcomplete-mode: t
  erc-button-mode: t
  erc-fill-mode: t
  erc-stamp-mode: t
  erc-autojoin-mode: t
  erc-match-mode: t
  erc-bbdb-mode: t
  erc-irccontrols-mode: t
  erc-noncommands-mode: t
  erc-move-to-prompt-mode: t
  erc-scrolltobottom-mode: t
  delete-selection-mode: t
  pc-selection-mode: t
  desktop-save-mode: t
  show-paren-mode: t
  display-time-mode: t
  tooltip-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  global-auto-composition-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<help-echo> <escape> x d e b u <tab> - o n <tab> <return> 
b o o k <tab> j u <tab> <return> <escape> x b o o k 
<tab> j u <tab> <return> <f12> <f12> <down-mouse-1> 
<mouse-1> <return> <escape> q <backspace> <down-mouse-1> 
<mouse-movement> <mouse-movement> <mouse-movement> 
<mouse-movement> <mouse-movement> <mouse-movement> 
<drag-mouse-1> C-x j <escape> x e m a <tab> r e p <tab> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> r e 
o p <tab> <backspace> <backspace> p o <tab> r <tab> 
b u <tab> <return>

Recent messages:
Loading em-term...done
Loading em-unix...done
For information about GNU Emacs and the GNU system, type C-h C-a.
Loading bookmark...done
Fontifying .emacs.bmk... (regexps...)
string-match: Wrong type argument: symbolp,
("org-remember-last-stored" (filename . "~/notes.org")
(front-context-string . "** [2009-05-26 D") (rear-context-string . "
Di 14:52] test ") (position . 2403))
Making completion list...

bug#3391: Bug#3391: 23.0.93; bookmarks-jump only works on second try

[Glenn Morris]

henry atting wrote:

> When trying to open a file with bookmark-jump the first try results in
> an error message like this:
>
> Loading bookmark...done
> Fontifying .emacs.bmk... (regexps...)
> string-match: Wrong type argument: symbolp,
> ("org-remember-last-stored" (filename . "~/notes.org")
> (front-context-string . "** [2009-05-26 D") (rear-context-string . "
> Di 14:52] test ") (position . 2403))


Please give a complete recipe showing how to reproduce the problem,
starting from emacs -Q with no .emacs.bmk file. Also, do M-x
toggle-debug-on-error and include the resulting backtrace.

I could not reproduce this in normal use of bookmarks, but it seems
org is involved somehow.

bug#3391: Bug#3391: 23.0.93; bookmarks-jump only works on second try

[henry atting]

[-- Attachment #1: Type: text/plain, Size: 1144 bytes --]

On Fr, Jun 19 2009, Glenn Morris wrote:

> henry atting wrote:
>
>> When trying to open a file with bookmark-jump the first try results in
>> an error message like this:
>>
>> Loading bookmark...done
>> Fontifying .emacs.bmk... (regexps...)
>> string-match: Wrong type argument: symbolp,
>> ("org-remember-last-stored" (filename . "~/notes.org")
>> (front-context-string . "** [2009-05-26 D") (rear-context-string . "
>> Di 14:52] test ") (position . 2403))
>
>
> Please give a complete recipe showing how to reproduce the problem,
> starting from emacs -Q with no .emacs.bmk file. Also, do M-x
> toggle-debug-on-error and include the resulting backtrace.
>
> I could not reproduce this in normal use of bookmarks, but it seems
> org is involved somehow.

Emacs started with `-Q' and a non-existing .emacs.bmk leads to no
problems. I can set bookmarks and jump to it. 

Emacs started as usual and no .emacs.bmk present causes no problems
either. But if I set a bookmark and start it again the above mentioned
behaviour reoccures. (As I don't use bookmarks this would be no problem,
but org-mode sets a bookmark when using org-remember)

henry


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: debug.txt --]
[-- Type: text/plain, Size: 3892 bytes --]

Debugger entered--Lisp error: (wrong-type-argument symbolp ("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]
") (position . 2181)))
  symbol-name(("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]\n") (position . 2181)))
  (string-match "@.*" (symbol-name (car-safe sexp)))
  (if (string-match "@.*" (symbol-name ...)) (progn (let ... ... ... ...) t))
  (when (string-match "@.*" (symbol-name ...)) (let (... ...) (set-marker begin-marker begin-point) (set-marker end-marker ...) (set-match-data ...)) t)
  (let ((begin-point ...)) (condition-case nil (setq sexp ...) (...)) (when (string-match "@.*" ...) (let ... ... ... ...) t))
  (let ((sexp nil)) (when (search-forward ... limit t) (backward-char 2)) (let (...) (condition-case nil ... ...) (when ... ... t)))
  linkd-match(379)
  funcall(linkd-match 379)
  (if (stringp matcher) (re-search-forward matcher end t) (funcall matcher end))
  (and (< (point) end) (if (stringp matcher) (re-search-forward matcher end t) (funcall matcher end)) (or (> ... ...) (progn ... t)))
  (while (and (< ... end) (if ... ... ...) (or ... ...)) (when (and font-lock-multiline ...) (put-text-property-unless-ignore ... ... ... t)) (setq highlights (cdr keyword)) (while highlights (if ... ... ... ... ...) (setq highlights ...)))
  (while keywords (if loudly (message "Fontifying %s... (regexps..%s)" bufname ...)) (setq keyword (car keywords) matcher (car keyword)) (goto-char start) (while (and ... ... ...) (when ... ...) (setq highlights ...) (while highlights ... ...)) (setq keywords (cdr keywords)))
  (let ((case-fold-search font-lock-keywords-case-fold-search) (keywords ...) (bufname ...) (count 0) (pos ...) keyword matcher highlights) (while keywords (if loudly ...) (setq keyword ... matcher ...) (goto-char start) (while ... ... ... ...) (setq keywords ...)) (set-marker pos nil))
  font-lock-fontify-keywords-region(1 379 t)
  font-lock-default-fontify-region(1 379 t)
  font-lock-fontify-region(1 379 t)
  byte-code("ŠÃ \x18ÄŽÅed	#ˆÆ ˆÇ‰\x12+‡" [save-match-data-internal verbose font-lock-fontified match-data ((byte-code "Á\bÂ\"‡" [save-match-data-internal set-match-data evaporate] 3)) font-lock-fontify-region font-lock-after-fontify-buffer t] 4)
  font-lock-default-fontify-buffer()
  font-lock-fontify-buffer()
  (let ((modified-p ...)) (add-hook (quote before-save-hook) (quote linkd-deactivate-all-datablocks) :append :local) (add-hook (quote after-save-hook) (quote linkd-activate-all-datablocks) :append :local) (linkd-do-font-lock (quote font-lock-add-keywords)) (font-lock-fontify-buffer) (set-buffer-modified-p modified-p))
  linkd-enable()
  (if linkd-mode (linkd-enable) (linkd-disable))
  (let ((last-message ...)) (setq linkd-mode (cond ... ... ...)) (if linkd-mode (linkd-enable) (linkd-disable)) (run-hooks (quote linkd-mode-hook) (if linkd-mode ... ...)) (if (called-interactively-p) (progn nil ...)))
  linkd-mode()
  run-hooks(text-mode-hook mytext-mode-hook)
  apply(run-hooks (text-mode-hook mytext-mode-hook))
  run-mode-hooks(mytext-mode-hook)
  (if (fboundp (quote run-mode-hooks)) (run-mode-hooks (quote mytext-mode-hook)) (run-hooks (quote mytext-mode-hook)))
  mytext-mode()
  normal-mode(t)
  after-find-file(nil t)
  find-file-noselect-1(#<buffer .emacs.bmk> "~/.emacs.bmk" nil nil "~/.emacs.bmk" (2532641 64513))
  find-file-noselect("/home/atting/.emacs.bmk")
  bookmark-load("~/.emacs.bmk" t t)
  bookmark-maybe-load-default-file()
  bookmark-completing-read("Jump to bookmark" nil)
  (list (bookmark-completing-read "Jump to bookmark" bookmark-current-bookmark))
  call-interactively(bookmark-jump t nil)
  execute-extended-command(nil)
  call-interactively(execute-extended-command nil nil)

bug#3391: Bug#3391: 23.0.93; bookmarks-jump only works on second try

[Glenn Morris]

Please keep 3391 in the cc.

henry atting wrote:

> On Fr, Jun 19 2009, Glenn Morris wrote:
[...]
>> Please give a complete recipe showing how to reproduce the problem,
>> starting from emacs -Q with no .emacs.bmk file.
[...]
> Emacs started as usual and no .emacs.bmk present causes no problems
> either. But if I set a bookmark and start it again the above mentioned
> behaviour reoccures. (As I don't use bookmarks this would be no problem,
> but org-mode sets a bookmark when using org-remember)


The recipe starting from emacs -Q is missing, but your backtrace
suggest this is a problem in linkd.el (specifically, in linkd-match),
which is not part of Emacs.


Debugger entered--Lisp error: (wrong-type-argument symbolp ("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]
") (position . 2181)))
  symbol-name(("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]\n") (position . 2181)))
  (string-match "@.*" (symbol-name (car-safe sexp)))
  (if (string-match "@.*" (symbol-name ...)) (progn (let ... ... ... ...) t))
  (when (string-match "@.*" (symbol-name ...)) (let (... ...) (set-marker begin-marker begin-point) (set-marker end-marker ...) (set-match-data ...)) t)
  (let ((begin-point ...)) (condition-case nil (setq sexp ...) (...)) (when (string-match "@.*" ...) (let ... ... ... ...) t))
  (let ((sexp nil)) (when (search-forward ... limit t) (backward-char 2)) (let (...) (condition-case nil ... ...) (when ... ... t)))
  linkd-match(379)
  funcall(linkd-match 379)

bug#3391: Bug#3391: 23.0.93; bookmarks-jump only works on second try

[henry atting]

On Sa, Jun 20 2009, Glenn Morris wrote:

> Please keep 3391 in the cc.
>
> henry atting wrote:
>
>> On Fr, Jun 19 2009, Glenn Morris wrote:
> [...]
>>> Please give a complete recipe showing how to reproduce the problem,
>>> starting from emacs -Q with no .emacs.bmk file.
> [...]
>> Emacs started as usual and no .emacs.bmk present causes no problems
>> either. But if I set a bookmark and start it again the above mentioned
>> behaviour reoccures. (As I don't use bookmarks this would be no problem,
>> but org-mode sets a bookmark when using org-remember)
>
>
> The recipe starting from emacs -Q is missing, but your backtrace
> suggest this is a problem in linkd.el (specifically, in linkd-match),
> which is not part of Emacs.
>
>
> Debugger entered--Lisp error: (wrong-type-argument symbolp ("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]
> ") (position . 2181)))
>   symbol-name(("org-remember-last-stored" (filename . "~/notes.org") (front-context-string . "** [2009-06-19 F") (rear-context-string . "file:~/.emacs]]\n") (position . 2181)))
>   (string-match "@.*" (symbol-name (car-safe sexp)))
>   (if (string-match "@.*" (symbol-name ...)) (progn (let ... ... ... ...) t))
>   (when (string-match "@.*" (symbol-name ...)) (let (... ...) (set-marker begin-marker begin-point) (set-marker end-marker ...) (set-match-data ...)) t)
>   (let ((begin-point ...)) (condition-case nil (setq sexp ...) (...)) (when (string-match "@.*" ...) (let ... ... ... ...) t))
>   (let ((sexp nil)) (when (search-forward ... limit t) (backward-char 2)) (let (...) (condition-case nil ... ...) (when ... ... t)))
>   linkd-match(379)
>   funcall(linkd-match 379)

Ah, yes, linkd.el was the culprit. Since I did not use it anymore I
removed it from .emacs. 

Many thanks
henry