(create-fontset-from-fontset-spec): Fix

regexp for paring FONTSET-SPEC (allow spaces after `:').

lisp/ChangeLog

@@ -1,3 +1,8 @@
+2006-03-06  Kenichi Handa  <handa@m17n.org>
+
+	* international/fontset.el (create-fontset-from-fontset-spec): Fix
+	regexp for paring FONTSET-SPEC (allow spaces after `:').
+
 2006-03-05  Luc Teirlinck  <teirllm@auburn.edu>
 
 	* progmodes/gud.el (gud-jdb-marker-filter): Double quote `[' in

lisp/international/fontset.el

@@ -542,7 +542,8 @@ It returns a name of the created fontset."
 	  (error "Fontset \"%s\" not conforming to XLFD" name))
 
       ;; At first, extract pairs of charset and fontname from FONTSET-SPEC.
-      (while (string-match "[, \t\n]*\\([^:]+\\):\\([^,]+\\)" fontset-spec idx)
+      (while (string-match "[, \t\n]*\\([^:]+\\):[ \t]*\\([^,]+\\)"
+			   fontset-spec idx)
 	(setq idx (match-end 0))
 	(setq charset (intern (match-string 1 fontset-spec)))
 	(if (charsetp charset)