gnu-emacs-sources
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: ;;; anything.el --- open anything


From: Tassilo Horn
Subject: Re: ;;; anything.el --- open anything
Date: Tue, 24 Jul 2007 10:38:52 +0200
User-agent: Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50 (gnu/linux)

Hi Tamas,

there's a little bug in anything.el. Sometimes when I invoke it several
times it'll error:

Debugger entered--Lisp error: (cl-assertion-failed header-pos)
  signal(cl-assertion-failed (header-pos))
  (or header-pos (signal (quote cl-assertion-failed) (list ...)))
  (progn (or header-pos (signal ... ...)) nil)
  (assert header-pos)
  (save-excursion (assert header-pos) (goto-char header-pos) 
(buffer-substring-no-properties (line-beginning-position) (line-end-position)))
  (let* ((header-pos ...) (source-name ...) (source ...) (action ...) (type 
...)) (unless action (unless type ...) (setq action ...)) (let* (...) (if 
transformer ... action)))
  (save-current-buffer (set-buffer anything-buffer) (let* (... ... ... ... ...) 
(unless action ... ...) (let* ... ...)))
  (with-current-buffer anything-buffer (let* (... ... ... ... ...) (unless 
action ... ...) (let* ... ...)))
  (if (= (buffer-size ...) 0) nil (with-current-buffer anything-buffer (let* 
... ... ...)))
  (unless (= (buffer-size ...) 0) (with-current-buffer anything-buffer (let* 
... ... ...)))
  anything-get-action()
  (if anything-saved-sources (anything-get-selection) (anything-get-action))
  (let* ((selection ...) (action ...)) (if (anything-list-but-not-lambda-p 
action) (setq action ...)) (if (and selection action) (funcall action 
selection)))
  anything-execute-selection-action()
  anything()
  call-interactively(anything)

If I kill the *anything* buffer it works again.

Bye,
Tassilo
-- 
People sometimes  ask me if it  is a sin in  the Church of  Emacs to use
vi. Using a free  version of vi is not a sin; it  is a penance. So happy
hacking. (Richard M. Stallman)





reply via email to

[Prev in Thread] Current Thread [Next in Thread]