mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(toplevel symbol-properties): Don't quote lambda.

Browse source
This commit is contained in:
Stefan Monnier 2000-06-12 05:29:56 +00:00
parent b94deab8d5
commit 206eef6cf4
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/thingatpt.el
View file

@ -199,9 +199,9 @@ a symbol as a valid THING."
"Characters allowable in filenames.")
(put 'filename 'end-op
'(lambda () (skip-chars-forward thing-at-point-file-name-chars)))
(lambda () (skip-chars-forward thing-at-point-file-name-chars)))
(put 'filename 'beginning-op
'(lambda () (skip-chars-backward thing-at-point-file-name-chars)))
(lambda () (skip-chars-backward thing-at-point-file-name-chars)))
(defvar thing-at-point-url-path-regexp
"[^]\t\n \"'()<>[^`{}]*[^]\t\n \"'()<>[^`{}.,;]+"
@ -336,8 +336,8 @@ point."
;; Buffer
(put 'buffer 'end-op '(lambda () (goto-char (point-max))))
(put 'buffer 'beginning-op '(lambda () (goto-char (point-min))))
(put 'buffer 'end-op (lambda () (goto-char (point-max))))
(put 'buffer 'beginning-op (lambda () (goto-char (point-min))))
;; Symbols