From a0dd9fdebe3baaccdbda428df428f696ee38356d Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sat, 3 Dec 2022 11:29:37 +0100 Subject: [PATCH] ; Add cross-reference to string-equal docstring * lisp/subr.el (string-equal-ignore-case): * src/fns.c (Fstring_equal): Doc fix; add cross-references. --- lisp/subr.el | 4 +++- src/fns.c | 4 +++- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/subr.el b/lisp/subr.el index 15662162798..21f43092d42 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -5437,7 +5437,9 @@ and replace a sub-expression, e.g. (defsubst string-equal-ignore-case (string1 string2) "Compare STRING1 and STRING2 case-insensitively. Upper-case and lower-case letters are treated as equal. -Unibyte strings are converted to multibyte for comparison." +Unibyte strings are converted to multibyte for comparison. + +See also `string-equal'." (declare (pure t) (side-effect-free t)) (eq t (compare-strings string1 0 nil string2 0 nil t))) diff --git a/src/fns.c b/src/fns.c index 7cc6d00afef..d8744c1a4de 100644 --- a/src/fns.c +++ b/src/fns.c @@ -334,7 +334,9 @@ Letter-case is significant, but text properties are ignored. */) DEFUN ("string-equal", Fstring_equal, Sstring_equal, 2, 2, 0, doc: /* Return t if two strings have identical contents. Case is significant, but text properties are ignored. -Symbols are also allowed; their print names are used instead. */) +Symbols are also allowed; their print names are used instead. + +See also `string-equal-ignore-case'. */) (register Lisp_Object s1, Lisp_Object s2) { if (SYMBOLP (s1)) -- 2.39.2