Mercurial > emacs
changeset 6523:d9d9ab5951dd
(x_get_arg): Use downcased string in compare.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Fri, 25 Mar 1994 01:34:24 +0000 |
| parents | eecaa7b19b6c |
| children | cedc6c52a812 |
| files | src/xfns.c |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xfns.c Fri Mar 25 01:18:47 1994 +0000 +++ b/src/xfns.c Fri Mar 25 01:34:24 1994 +0000 @@ -1436,11 +1436,11 @@ { Lisp_Object lower; lower = Fdowncase (tem); - if (!strcmp (XSTRING (tem)->data, "on") - || !strcmp (XSTRING (tem)->data, "true")) + if (!strcmp (XSTRING (lower)->data, "on") + || !strcmp (XSTRING (lower)->data, "true")) return Qt; - else if (!strcmp (XSTRING (tem)->data, "off") - || !strcmp (XSTRING (tem)->data, "false")) + else if (!strcmp (XSTRING (lower)->data, "off") + || !strcmp (XSTRING (lower)->data, "false")) return Qnil; else return Fintern (tem, Qnil);