[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/subr.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/subr.el |
Date: |
Wed, 23 Jan 2002 12:46:44 -0500 |
Index: emacs/lisp/subr.el
diff -c emacs/lisp/subr.el:1.281 emacs/lisp/subr.el:1.282
*** emacs/lisp/subr.el:1.281 Sat Dec 22 08:36:12 2001
--- emacs/lisp/subr.el Wed Jan 23 12:46:44 2002
***************
*** 1080,1086 ****
(if (> (overlay-end o) end)
(move-overlay o end (overlay-end o))
(delete-overlay o)))))))
!
;;;; Miscellanea.
;; A number of major modes set this locally.
--- 1080,1086 ----
(if (> (overlay-end o) end)
(move-overlay o end (overlay-end o))
(delete-overlay o)))))))
!
;;;; Miscellanea.
;; A number of major modes set this locally.
***************
*** 1361,1366 ****
--- 1361,1372 ----
(list 'unwind-protect
(cons 'progn body)
'(set-match-data save-match-data-internal))))
+
+ (defun copy-without-properties (string)
+ "Return a copy of STRING with no text properties."
+ (setq string (concat string))
+ (set-text-properties 0 (length string) nil string)
+ string)
(defun match-string (num &optional string)
"Return string of text matched by last search.
- [Emacs-diffs] Changes to emacs/lisp/subr.el,
Richard M. Stallman <=