[O] Lisp nesting exceeds `max-lisp-eval-depth'"

[Martin Butz]

Hello all,

I get the following error message while using org-mode during the last 
weeks quite frequently (unfortunately I am not able to link it to an 
update of the installation of some lisp file); I can reproduce the 
behaviour by opening the agenda buffer (C-c a a) and trying to quit with 
"q"; this will open a new frame with the backtrace buffer and leave the 
agenda buffer in the other frame open.

There are loads of other events, which trigger the same behaviour; can 
anybody give a hint how I can solve this rather annoying problem?

Thanks in advance
Martin

---- Backtrace --8<----------------------------------------------------

Debugger entered--Lisp error: (error "Lisp nesting exceeds 
`max-lisp-eval-depth'")
  (- (nth 2 edges) (nth 0 edges))
  (let ((edges ...)) (- (nth 2 edges) (nth 0 edges)))
  sr-speedbar-current-window-take-width()
  (let ((win-width ...)) (if (and ... ... ...) (setq sr-speedbar-width 
win-width)))
  sr-speedbar-remember-window-width()
  old-delete-window(#<window 20 on *Org Agenda*>)

---- following lines are repeated several times--8<--------------------

  (if (one-window-p t) (delete-frame) (old-delete-window 
(selected-window)))
  (save-current-buffer (setq window (or window ...)) (select-window 
window) (if (one-window-p t) (delete-frame) (old-delete-window ...)))
  ad-Orig-delete-window(#<window 20 on *Org Agenda*>)
  old-delete-window(#<window 20 on *Org Agenda*>)

---- /following lines are repeated several times--8<-------------------

  (if (one-window-p t) (delete-frame) (old-delete-window 
(selected-window)))
  (save-current-buffer (setq window (or window ...)) (select-window 
window) (if (one-window-p t) (delete-frame) (old-delete-window ...)))
  ad-Orig-delete-window(nil)
  delete-window()
  (and (not (eq org-agenda-window-setup ...)) (not (one-window-p)) 
(delete-window))
  (if (eq org-agenda-window-setup (quote other-frame)) (progn 
(kill-buffer buf) (org-agenda-reset-markers) 
(org-columns-remove-overlays) (setq org-agenda-archives-mode nil) 
(delete-frame)) (and (not ...) (not ...) (delete-window)) (kill-buffer 
buf) (org-agenda-reset-markers) (org-columns-remove-overlays) (setq 
org-agenda-archives-mode nil))
  (let ((buf ...)) (if (eq org-agenda-window-setup ...) (progn ... ... 
... ... ...) (and ... ... ...) (kill-buffer buf) 
(org-agenda-reset-markers) (org-columns-remove-overlays) (setq 
org-agenda-archives-mode nil)))
  (if org-agenda-columns-active (org-columns-quit) (let (...) (if ... 
... ... ... ... ... ...)) (and org-agenda-restore-windows-after-quit 
(not ...) org-pre-agenda-window-conf (set-window-configuration 
org-pre-agenda-window-conf)))
  org-agenda-quit()
  call-interactively(org-agenda-quit nil nil)

---- /Backtrace --8<---------------------------------------------------

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
sym.net  ||  butz & siefer gbr  ||  50670 koeln  ||  hansaring 78
phone +49(0)221/3762591 -  twitter.com/symnet  - mail address@hidden
~~~~~~~~~~~~~~~~~~ www.sym.net | www.moodalis.de ~~~~~~~~~~~~~~~~