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

Fix bug with string values in equal-including-properties

Browse source 
* src/intervals.c (intervals_equal_1): Factor out from
intervals_equal.  Optionally use Fequal for comparison of string
values in property lists.
(intervals_equal): Update for the above.
(compare_string_intervals): Use the above optional Fequal comparison
to fix a bug where 'equal-including-properties' compared strings with
eq, instead of equal.  (Bug#6581)
* test/src/fns-tests.el (fns-tests-equal-including-properties)
(fns-tests-equal-including-properties/string-prop-vals): New tests.

* test/lisp/emacs-lisp/ert-tests.el
(ert-test-equal-including-properties): Remove parts testing
'equal-including-properties'.
* lisp/emacs-lisp/ert.el (ert-equal-including-properties): Add
FIXME that this should be removed.
This commit is contained in:
Stefan Kangas 2021-10-20 14:16:07 +02:00
parent da67e888d5
commit 8227d1273e
4 changed files with 43 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/emacs-lisp/ert.el
View file

@ -92,6 +92,7 @@ Use nil for no limit (caution: backtrace lines can be very long)."
;;; Copies/reimplementations of cl functions.
;; FIXME: Bug#6581 is fixed, so this should be deleted.
(defun ert-equal-including-properties (a b)
"Return t if A and B have similar structure and contents.