Changeset 1305

Timestamp:

08/14/06 10:36:18

Author:

miyagawa

Message:

Added $BaseDirURI to deal with multibyte directory names and "use utf8" in *.t Fixes #370

Files:

• trunk/plagger/t/TestPlagger.pm (modified) (3 diffs)
• trunk/plagger/t/plugins/Filter-BreakEntriesToFeeds/break.t (modified) (3 diffs)
• trunk/plagger/t/regression/atom1-category.t (modified) (1 diff)
• trunk/plagger/t/regression/rss2-category.t (modified) (1 diff)

trunk/plagger/t/TestPlagger.pm

@@ -4 +4 @@
-use File::Spec;
-use Test::Base -Base;
+use URI::Escape ();
-use Plagger;
-
@@ -10 +11 @@
-                 slurp_file file_contains file_doesnt_contain);
-
- $BaseDir
+($BaseDir, $BaseDirURI)
-{
-    my @path = File::Spec->splitdir($FindBin::Bin);
@@ -16 +17 @@
-        if ($dir eq 't') {
-            $BaseDir = File::Spec->catfile(@path);
+            $BaseDirURI = join "/", map URI::Escape::uri_escape($_), @path;
-            last;
-        }
-    }
-    $BaseDir =~ s{\\}{/}g; # always use forward slash even on Win32
-}
-

trunk/plagger/t/plugins/Filter-BreakEntriesToFeeds/break.t

@@ -13 +13 @@
-    config:
-      feed:
-
-
+URI
+URI
-  - module: Filter::BreakEntriesToFeeds
---- expected
@@ -31 +31 @@
-    config:
-      feed:
-
-
+URI
+URI
-  - module: Filter::BreakEntriesToFeeds
-    config:
@@ -48 +48 @@
-    config:
-      feed:
-
-
+URI
+URI
-  - module: Filter::BreakEntriesToFeeds
-    rule:

trunk/plagger/t/regression/atom1-category.t

@@ -16 +16 @@
-    config:
-      feed:
-
+URI
---- expected
-is_deeply scalar $context->update->feeds->[0]->entries->[0]->tags, [ 'Catalyst' ];

trunk/plagger/t/regression/rss2-category.t

@@ -16 +16 @@
-    config:
-      feed:
-
+URI
---- expected
-is $context->update->feeds->[0]->entries->[0]->tags->[0], 'News';