Commit 6bafe8bc authored by Glenn Morris's avatar Glenn Morris
Browse files

Lawrence Mitchell <wence at gmx.li> (tiny change)

(Equality Predicates): Add defun for equal-including-properties.
parent d6a72cc5
...@@ -2032,6 +2032,23 @@ returns @code{t} if and only if both the expressions below return ...@@ -2032,6 +2032,23 @@ returns @code{t} if and only if both the expressions below return
Because of this recursive method, circular lists may therefore cause Because of this recursive method, circular lists may therefore cause
infinite recursion (leading to an error). 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 @ignore
arch-tag: 9711a66e-4749-4265-9e8c-972d55b67096 arch-tag: 9711a66e-4749-4265-9e8c-972d55b67096
@end ignore @end ignore
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment