CVS update by aidan xemacs/lisp ...

[xemacs-cvs at xemacs.org]

  User: aidan   
  Date: 07/10/03 18:53:41

  Modified:    xemacs/lisp ChangeLog unicode.el
Log:
Comment out an assertion to avoid breaking the build.

Revision  Changes    Path
1.847     +7 -0      XEmacs/xemacs/lisp/ChangeLog

Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v
retrieving revision 1.846
retrieving revision 1.847
diff -u -p -r1.846 -r1.847
--- ChangeLog	2007/10/02 20:08:57	1.846
+++ ChangeLog	2007/10/03 16:53:38	1.847
@@ -1,3 +1,10 @@
+2007-10-03  Aidan Kehoe  <kehoea at parhasard.net>
+
+	* unicode.el (featurep):
+	Comment out the assertion until the issue in
+	18179.49815.622843.336527 at parhasard.net is fixed.  This doesn't
+	remove any functionality, just a check. 
+
 2007-10-02  Aidan Kehoe  <kehoea at parhasard.net>
 
 	* code-files.el (insert-file-contents):



1.25      +5 -3      XEmacs/xemacs/lisp/unicode.el

Index: unicode.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/unicode.el,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -p -r1.24 -r1.25
--- unicode.el	2007/10/02 10:33:05	1.24
+++ unicode.el	2007/10/03 16:53:39	1.25
@@ -552,9 +552,11 @@ invalid octet.  You can use this variabl
 		      i))
 
       (goto-char (point-min))
-      (assert (re-search-forward (concat "[" 
-					 unicode-error-sequence-regexp-range
-					 "]"))
+      ;; Comment out until the issue in
+      ;; 18179.49815.622843.336527 at parhasard.net is fixed.
+      (assert t ;(re-search-forward (concat "[" 
+		;			 unicode-error-sequence-regexp-range
+		;			 "]"))
 	      nil
 	      (format "Could not find char ?\\x%x in buffer" i))))