[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bounds-of-thing-at-point from thingatpt.el broken
From: |
P.L.Hayes |
Subject: |
bounds-of-thing-at-point from thingatpt.el broken |
Date: |
Wed, 13 Sep 2006 12:15:15 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
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 address@hidden mailing list.
Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:
(bounds-of-thing-at-point 'url) fails to find the bounds of URLs
beginning with, "http://" (it has worked fine before today). The cause
appears to be a spurious backquote in this defun:
(defun thing-at-point-bounds-of-url-at-point ()
(let ((strip (thing-at-point-looking-at
thing-at-point-markedup-url-regexp))) ;; (url "") short
(if (or strip
` (thing-at-point-looking-at thing-at-point-url-regexp)
;; Access scheme omitted?
;; (setq short (thing-at-point-looking-at
;; thing-at-point-short-url-regexp))
)
(let ((beginning (match-beginning 0))
(end (match-end 0)))
(when strip
(setq beginning (+ beginning 5))
(setq end (- end 1)))
(cons beginning end)))))
(also from thingatpt.el). It works okay again when I remove that
backquote.
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/22.0.50/etc/DEBUG for instructions.
In GNU Emacs 22.0.50.1 (i686-pc-linux-gnu, GTK+ Version 2.8.20)
of 2006-09-13 on wolfbone
X server distributor `The X.Org Foundation', version 11.0.70101000
configured using `configure '--prefix=/usr' '--host=i686-pc-linux-gnu'
'--mandir=/usr/share/man' '--infodir=/usr/share/info' '--datadir=/usr/share'
'--sysconfdir=/etc' '--localstatedir=/var/lib'
'--program-suffix=.emacs-22.0.50' '--without-carbon' '--with-x' '--with-xpm'
'--with-toolkit-scroll-bars' '--with-jpeg' '--with-tiff' '--with-gif'
'--with-png' '--with-x-toolkit=gtk' '--build=i686-pc-linux-gnu' 'CFLAGS=-O2'
'build_alias=i686-pc-linux-gnu' 'host_alias=i686-pc-linux-gnu''
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: en_GB.utf8
locale-coding-system: utf-8
default-enable-multibyte-characters: t
Major mode: Lisp Interaction
Minor modes in effect:
show-paren-mode: t
msb-mode: t
desktop-save-mode: t
tooltip-mode: t
tool-bar-mode: t
mouse-wheel-mode: t
menu-bar-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
font-lock-mode: t
blink-cursor-mode: t
unify-8859-on-encoding-mode: t
utf-translate-cjk-mode: t
auto-compression-mode: t
column-number-mode: t
line-number-mode: t
transient-mark-mode: identity
Recent input:
<down-mouse-5> <mouse-5> <down-mouse-5> <mouse-5> <down-mouse-4>
<mouse-4> <help-echo> <down-mouse-5> <mouse-5> <down-mouse-5>
<mouse-5> <down-mouse-5> <mouse-5> <down-mouse-5> <mouse-5>
<down-mouse-4> <mouse-4> <double-down-mouse-4> <double-mouse-4>
<down-mouse-4> <mouse-4> <double-down-mouse-4> <double-mouse-4>
<help-echo> <down-mouse-5> <mouse-5> <down-mouse-4>
<mouse-4> <down-mouse-5> <mouse-5> <down-mouse-4> <mouse-4>
<down-mouse-5> <mouse-5> <help-echo> <down-mouse-4>
<mouse-4> <help-echo> <help-echo> <help-echo> <tool-bar>
<undo> <down-mouse-5> <mouse-5> <help-echo> <down-mouse-1>
<mouse-1> C-x k <return> C-x k <return> C-x 0 M-x b
u g <tab> <backspace> <backspace> <backspace> e m a
c s - b u g <tab> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> r e p o r t <tab> <tab> <down-mouse-4>
<mouse-4> <down-mouse-1> <mouse-movement> <mouse-movement>
<drag-mouse-1> <help-echo> <down-mouse-1> <mouse-1>
<return>
Recent messages:
Result: 113 (#o161, #x71, ?q) [2 times]
Result: nil [2 times]
Result: 113 (#o161, #x71, ?q)
call-interactively: Buffer is read-only: #<buffer thingatpt.el.gz>
Mark set
thing-at-point-bounds-of-url-at-point
byte-code: Beginning of buffer
(1 . 25)
Undo!
Loading emacsbug...done
- bounds-of-thing-at-point from thingatpt.el broken,
P.L.Hayes <=