Mercurial > emacs
changeset 80102:3b51b5b38332
Lawrence Mitchell <wence at gmx.li> (tiny change)
(Equality Predicates): Add defun for equal-including-properties.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Mon, 11 Feb 2008 00:49:28 +0000 |
parents | e5543d2b244f |
children | 273ae2c8519f |
files | lispref/objects.texi |
diffstat | 1 files changed, 17 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lispref/objects.texi Mon Feb 11 00:47:11 2008 +0000 +++ b/lispref/objects.texi Mon Feb 11 00:49:28 2008 +0000 @@ -2032,6 +2032,23 @@ Because of this recursive method, circular lists may therefore cause infinite recursion (leading to an error). +@defun equal-including-properties object1 object2 +This function behaves like @code{equal} in all cases but also requires +that for two strings to be equal, they have the same text properties. + +@example +@group +(equal "asdf" (propertize "asdf" '(asdf t))) + @result{} t +@end group +@group +(equal-including-properties "asdf" + (propertize "asdf" '(asdf t))) + @result{} nil +@end group +@end example +@end defun + @ignore arch-tag: 9711a66e-4749-4265-9e8c-972d55b67096 @end ignore