diff src/redisplay-msw.c @ 444:576fb035e263 r21-2-37

Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 5fd7ba8b56e7
line wrap: on
line diff
--- a/src/redisplay-msw.c	Mon Aug 13 11:35:05 2007 +0200
+++ b/src/redisplay-msw.c	Mon Aug 13 11:36:19 2007 +0200
@@ -134,9 +134,9 @@
 #ifdef MULE
 	  {
 	    Lisp_Object ccl_prog = XCHARSET_CCL_PROGRAM (charset);
-	    need_ccl_conversion = !NILP (ccl_prog);
-	    if (need_ccl_conversion)
-	      setup_ccl_program (&char_converter, ccl_prog);
+	    if ((!NILP (ccl_prog))
+		  && (setup_ccl_program (&char_converter, ccl_prog) >= 0))
+	      need_ccl_conversion = 1;
 	  }
 #endif
 	}