Changeset 6eaca65 in lab.git for misc

Timestamp:

Mar 10, 2013 7:08:28 PM (12 years ago)

Author:

mitty <mitty@…>

Branches:

master, trunk

Children:

4181361

Parents:

a1128c4

Message:

• treat filename with unknown coding set as UTF-8

git-svn-id: ​https://lab.mitty.jp/svn/lab/trunk@204 7d2118f6-f56c-43e7-95a2-4bb3031d96e7

File:

• misc/save.pl (modified) (1 diff)

misc/save.pl

@@ -39 +39 @@
                 Encode::FB_HTMLCREF
             );
-            print ": $filename\n";
         }
+        else {
+            print "utf8?";
+            $filename = encode(
+                $coding,
+                decode("utf8", $filename),
+                Encode::FB_HTMLCREF
+            );
+        }
+        print ": $filename\n";
         
         my $suffix = 1;