Mercurial > emacs
comparison lisp/speedbar.el @ 53487:25ff62ff164d
(speedbar-edit-line): Change regexp to position
the cursor on the first character of this line's button.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 03 Jan 2004 21:12:08 +0000 |
parents | 695cf19ef79e |
children | d21a8e697065 |
comparison
equal
deleted
inserted
replaced
53486:23376885b0f9 | 53487:25ff62ff164d |
---|---|
3408 ;; If this fails, then it is a non-standard click, and as such, | 3408 ;; If this fails, then it is a non-standard click, and as such, |
3409 ;; perfectly allowed. | 3409 ;; perfectly allowed. |
3410 (if (re-search-forward "[]>?}] [^ ]" | 3410 (if (re-search-forward "[]>?}] [^ ]" |
3411 (save-excursion (end-of-line) (point)) | 3411 (save-excursion (end-of-line) (point)) |
3412 t) | 3412 t) |
3413 (speedbar-do-function-pointer) | 3413 (progn |
3414 (forward-char -1) | |
3415 (speedbar-do-function-pointer)) | |
3414 nil)) | 3416 nil)) |
3415 (speedbar-do-function-pointer))) | 3417 (speedbar-do-function-pointer))) |
3416 | 3418 |
3417 (defun speedbar-expand-line (&optional arg) | 3419 (defun speedbar-expand-line (&optional arg) |
3418 "Expand the line under the cursor. | 3420 "Expand the line under the cursor. |