Index: src/Plugins/Freetype/tt_file.cpp
===================================================================
--- src/Plugins/Freetype/tt_file.cpp	(revision 3152)
+++ src/Plugins/Freetype/tt_file.cpp	(working copy)
@@ -73,8 +73,15 @@
 
   url tt_path=
     search_sub_dirs ("$TEXMACS_HOME_PATH/fonts/truetype") |
+#if defined __MINGW32__
+    search_sub_dirs ("$windir/Fonts");
+#elif defined OS_MACOS
     search_sub_dirs ("$HOME/Library/Fonts") |
     search_sub_dirs ("/Library/Fonts");
+#else
+    search_sub_dirs ("/usr/share/fonts/truetype") |
+    search_sub_dirs ("/usr/local/share/fonts/truetype");
+#endif
   return resolve (tt_path * name);
 }
 
@@ -87,6 +94,8 @@
   u= tt_locate (name * ".ttf");
   //if (!is_none (u)) cout << name << " -> " << u << "\n";
   //else cout << name << " -> ???\n";
+  if (!is_none (u)) return u;
+  u= tt_locate (name * ".ttc");
   return u;
 }
 
Index: TeXmacs/progs/fonts/fonts-truetype.scm
===================================================================
--- TeXmacs/progs/fonts/fonts-truetype.scm	(revision 3152)
+++ TeXmacs/progs/fonts/fonts-truetype.scm	(working copy)
@@ -68,10 +68,24 @@
     ((ipa $v $a $b $s $d) (unicode ipam $s $d))
     ((kochi $v bold $b $s $d) (unicode kochi-gothic $s $d))
     ((kochi $v $a $b $s $d) (unicode kochi-mincho $s $d))
+    ((mingliu $v $a $b $s $d) (unicode mingliu $s $d))
+    ((simfang $v $a $b $s $d) (unicode simfang $s $d))
+    ((simhei $v $a $b $s $d) (unicode simhei $s $d))
+    ((simkai $v $a $b $s $d) (unicode simkai $s $d))
+    ((simli $v $a $b $s $d) (unicode simli $s $d))
+    ((simsun ss $a $b $s $d) (unicode simkai $s $d))
+    ((simsun $v bold $b $s $d) (unicode simhei $s $d))
+    ((simsun $v $a $b $s $d) (unicode simsun $s $d))
+    ((simyou $v $a $b $s $d) (unicode simyou $s $d))
+    ((ukai $v $a $b $s $d) (unicode ukai $s $d))
+    ((uming $v $a $b $s $d) (unicode uming $s $d))
     ((unbatang ss bold $b $s $d) (unicode UnDotumBold $s $d))
     ((unbatang ss $a $b $s $d) (unicode UnDotum $s $d))
     ((unbatang $v bold $b $s $d) (unicode UnBatangBold $s $d))
     ((unbatang $v $a $b $s $d) (unicode UnBatang $s $d))
+    ((wqy-microhei $v $a $b $s $d) (unicode wqy-microhei $s $d))
+    ((wqy-zenhei $v bold $b $s $d) (unicode wqy-microhei $s $d))
+    ((wqy-zenhei $v $a $b $s $d) (unicode wqy-zenhei $s $d))
 
     ((mac-batang $v $a $b $s $d) (unicode Batang $s $d))
     ((mac-gulim $v $a $b $s $d) (unicode Gulim $s $d))
Index: TeXmacs/progs/text/format-text-menu.scm
===================================================================
--- TeXmacs/progs/text/format-text-menu.scm	(revision 3152)
+++ TeXmacs/progs/text/format-text-menu.scm	(working copy)
@@ -147,6 +147,28 @@
 	      ("Ipa" (make-with "font" "ipa")))
 	  (if (font-exists-in-tt? "kochi-mincho")
 	      ("Kochi" (make-with "font" "kochi")))
+      (if (font-exists-in-tt? "mingliu")
+          ("MingLiU" (make-with "font" "mingliu")))
+      (if (font-exists-in-tt? "simfang")
+          ("SimFang" (make-with "font" "simfang")))
+      (if (font-exists-in-tt? "simhei")
+          ("SimHei" (make-with "font" "simhei")))
+      (if (font-exists-in-tt? "simkai")
+          ("SimKai" (make-with "font" "simkai")))
+      (if (font-exists-in-tt? "simli")
+          ("SimLi" (make-with "font" "simli")))
+      (if (font-exists-in-tt? "simsun")
+          ("SimSun" (make-with "font" "simsun")))
+      (if (font-exists-in-tt? "simyou")
+          ("SimYou" (make-with "font" "simyou")))
+      (if (font-exists-in-tt? "ukai")
+          ("UKai" (make-with "font" "ukai")))
+      (if (font-exists-in-tt? "uming")
+          ("UMing" (make-with "font" "uming")))
+      (if (font-exists-in-tt? "wqy-microhei")
+          ("MicroHei" (make-with "font" "wqy-microhei")))
+      (if (font-exists-in-tt? "wqy-zenhei")
+          ("ZenHei" (make-with "font" "wqy-zenhei")))
 	  (if (url-exists-in-tex? "mxed.mf")
 	      (-> "Georgian"
 		  ("Mxedruli" (make-with "font" "mxedruli"))