emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master b91bfa1: Explicit error on changing case of negativ


From: Glenn Morris
Subject: [Emacs-diffs] master b91bfa1: Explicit error on changing case of negative integers
Date: Thu, 16 Feb 2017 23:24:56 -0500 (EST)

branch: master
commit b91bfa10413182654a76d0ba337198f39a4d0e8e
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    Explicit error on changing case of negative integers
    
    * src/casefiddle.c (casify_object): Reject negative integers:
    Emacs characters are positive integers.  (Bug#25684)
---
 src/casefiddle.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/casefiddle.c b/src/casefiddle.c
index b2b87e7..11d5944 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -41,7 +41,7 @@ casify_object (enum case_action flag, Lisp_Object obj)
   if (NILP (XCHAR_TABLE (BVAR (current_buffer, downcase_table))->extras[1]))
     Fset_case_table (BVAR (current_buffer, downcase_table));
 
-  if (INTEGERP (obj))
+  if (NATNUMP (obj))
     {
       int flagbits = (CHAR_ALT | CHAR_SUPER | CHAR_HYPER
                      | CHAR_SHIFT | CHAR_CTL | CHAR_META);



reply via email to

[Prev in Thread] Current Thread [Next in Thread]