[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: dabbrev hang
From: |
Klaus Zeitler |
Subject: |
Re: dabbrev hang |
Date: |
28 May 2003 15:29:48 +0200 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.3 |
>>>>> "Kin" == Kin Cho <kin@neoscale.com> writes:
Kin>
Kin> I call dabbrev-expand while the minibuffer is active (e.g.,
Kin> interactively calling eval-expression), it dabbrev hangs in
Kin> dabbrev--goto-start-of-abbrev.
Kin>
Kin> The reason is that (bobp) is false and (forward-char -1)
Kin> can't backup into the prompt.
Kin>
Kin> I'm thinking advicing bobp to cope with this, but is there a
Kin> better fix?
Kin>
Kin> I'm using emacs 21.3.
I tried to follow up on this on gnu.emacs.bug, but my last replies there
haven't shown up. Thus I'll repost it here.
that is probably the bug I reported last year, RMS sent me a patch
for this problem. Please try:
--- snip ---
*** /vol/freeware/SunOS-5.8/emacs/21.3/share/emacs/21.3/lisp/dabbrev.el Thu Jun
21 09:40:45 2001
---
/vol/freeware/SunOS-5.8/emacs/21.3/share/emacs/21.3/site-lisp/patch/dabbrev.el
Mon Apr 7 15:42:57 2003
***************
*** 599,605 ****
(progn
(forward-char -1)
(while (and (looking-at dabbrev--abbrev-char-regexp)
! (not (bobp)))
(forward-char -1))
(or (looking-at dabbrev--abbrev-char-regexp)
(forward-char 1))))
--- 599,605 ----
(progn
(forward-char -1)
(while (and (looking-at dabbrev--abbrev-char-regexp)
! (not (= (point) (field-beginning (point)))))
(forward-char -1))
(or (looking-at dabbrev--abbrev-char-regexp)
(forward-char 1))))
***************
*** 948,953 ****
--- 948,954 ----
"\\(" dabbrev--abbrev-char-regexp "\\)"))
(pattern2 (concat (regexp-quote abbrev)
"\\(\\(" dabbrev--abbrev-char-regexp "\\)+\\)"))
+ (inhibit-point-motion-hooks t)
(found-string nil))
;; Limited search.
(save-restriction
--- snip ---
This patch didn't make it into 21.3, I'll check if it's in CVS.
Klaus
--
------------------------------------------
| Klaus Zeitler Lucent Technologies |
------------------------------------------
---
Whenever anyone says, "theoretically", they
really mean, "not really". -- Dave Parnas
- dabbrev hang, Kin Cho, 2003/05/27
- Re: dabbrev hang,
Klaus Zeitler <=