---
 texk/dvipsk/ChangeLog |    5 +++++
 texk/dvipsk/writet1.c |    4 +++-
 2 files changed, 8 insertions(+), 1 deletion(-)

--- texlive-bin.orig/texk/dvipsk/ChangeLog
+++ texlive-bin/texk/dvipsk/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-31  Akira Kakuto  <kakuto@fuk.kindai.ac.jp>
+
+	* writet1.c: Remove UniqueID in t1_subset_ascii_part().
+	Report from Christian Zietz (czietz@gmx.net tug.org).
+
 2013-04-07  Karl Berry  <karl@tug.org>
 
 	* resident.c (getdefaults) <m>: if <= 0, set to INT_MAX.
--- texlive-bin.orig/texk/dvipsk/writet1.c
+++ texlive-bin/texk/dvipsk/writet1.c
@@ -1167,7 +1167,9 @@
     t1_getline();
     while (!t1_prefix("/Encoding")) {
         t1_scan_param();
-        t1_putline();
+        if (!(t1_prefix("/UniqueID") &&
+            !strncmp(t1_line_array + strlen(t1_line_array) -4, "def", 3)))
+            t1_putline();
         t1_getline();
     }
     if (is_reencoded(fm_cur))
