Parent Directory | Revision Log | Patch
revision 1.48 by jet, Tue Mar 16 09:52:36 2004 UTC | revision 1.49 by rms, Sun Feb 27 10:34:59 2005 UTC | |
---|---|---|
# | Line 227 The Lisp value REGISTER is a character." | Line 227 The Lisp value REGISTER is a character." |
227 | (princ (car val)))) | (princ (car val)))) |
228 | ||
229 | ((stringp val) | ((stringp val) |
230 | (remove-list-of-text-properties 0 (length val) | (if (eq yank-excluded-properties t) |
231 | yank-excluded-properties val) | (set-text-properties 0 (length val) nil val) |
232 | (remove-list-of-text-properties 0 (length val) | |
233 | yank-excluded-properties val)) | |
234 | (if verbose | (if verbose |
235 | (progn | (progn |
236 | (princ "the text:\n") | (princ "the text:\n") |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |