Conditionalize redefinition of `digit-char-p'

--=-=-=
Content-Type: text/plain


So here's the new patch to fix to digit-char-p problem:

2015-06-25  Michael Sperber  <[email protected]>

	* lisp/parse-time.el (fboundp): Conditionalize this on the
	existence of `digit-char-p'.

I'll push this over the weekend if nobody objects.

-- 
Regards,
Mike

--=-=-=
Content-Type: text/plain
Content-Disposition: inline

diff --git a/lisp/parse-time.el b/lisp/parse-time.el
--- a/lisp/parse-time.el
+++ b/lisp/parse-time.el
@@ -62,8 +62,9 @@
   (aset parse-time-syntax ?: ?d)
   )
 
-(defsubst digit-char-p (char)
-  (aref parse-time-digits char))
+(unless (fboundp 'digit-char-p)
+  (defsubst digit-char-p (char)
+    (aref parse-time-digits char)))
 
 (defsubst parse-time-string-chars (char)
   (and (< char (length parse-time-syntax))

--=-=-=
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
XEmacs-Patches mailing list
[email protected]
http://lists.xemacs.org/mailman/listinfo/xemacs-patches

--=-=-=--