Debugger entered--Lisp error: (excessive-lisp-nesting)

[uzibalqa]

I am getting the following debugger information but have been unable to locate 
the problem.

What can I do ?


Debugger entered--Lisp error: (excessive-lisp-nesting)
  (cond ((eq arg 'toggle) (not tematika-minor-mode)) ((and (numberp arg) (< arg 
1)) nil) (t t))
  (setq tematika-minor-mode (cond ((eq arg 'toggle) (not tematika-minor-mode)) 
((and (numberp arg) (< arg 1)) nil) (t t)))
  (let ((last-message (current-message))) (setq tematika-minor-mode (cond ((eq 
arg 'toggle) (not tematika-minor-mode)) ((and (numberp arg) (< arg 1)) nil) (t 
t))) (if (boundp 'local-minor-modes) (progn (setq local-minor-modes (delq 
'tematika-minor-mode local-minor-modes)) (if tematika-minor-mode (progn (setq 
local-minor-modes (cons 'tematika-minor-mode local-minor-modes)))))) (if 
tematika-minor-mode (progn (tematika-tools) (tematika-addhooks-woutline) 
(tematika-activate-woutline) (message "Tematika Activated")) 
(tematika-activate-woutline) (message "Tematika Deactivated")) (run-hooks 
'tematika-minor-mode-hook (if tematika-minor-mode 'tematika-minor-mode-on-hook 
'tematika-minor-mode-off-hook)) (if (called-interactively-p 'any) (progn nil 
(if (and (current-message) (not (equal last-message (current-message)))) nil 
(let ((local " in current buffer")) (message "Tematika minor mode %sabled%s" 
(if tematika-minor-mode "en" "dis") local))))))
  tematika-minor-mode(0)
  tematika-activate-woutline()
  (if tematika-minor-mode (progn (tematika-tools) (tematika-addhooks-woutline) 
(tematika-activate-woutline) (message "Tematika Activated")) 
(tematika-activate-woutline) (message "Tematika Deactivated"))
  (let ((last-message (current-message))) (setq tematika-minor-mode (cond ((eq 
arg 'toggle) (not tematika-minor-mode)) ((and (numberp arg) (< arg 1)) nil) (t 
t))) (if (boundp 'local-minor-modes) (progn (setq local-minor-modes (delq 
'tematika-minor-mode local-minor-modes)) (if tematika-minor-mode (progn (setq 
local-minor-modes (cons 'tematika-minor-mode local-minor-modes)))))) (if 
tematika-minor-mode (progn (tematika-tools) (tematika-addhooks-woutline) 
(tematika-activate-woutline) (message "Tematika Activated")) 
(tematika-activate-woutline) (message "Tematika Deactivated")) (run-hooks 
'tematika-minor-mode-hook (if tematika-minor-mode 'tematika-minor-mode-on-hook 
'tematika-minor-mode-off-hook)) (if (called-interactively-p 'any) (progn nil 
(if (and (current-message) (not (equal last-message (current-message)))) nil 
(let ((local " in current buffer")) (message "Tematika minor mode %sabled%s" 
(if tematika-minor-mode "en" "dis") local))))))
  tematika-minor-mode(0)