Changeset 36778

Timestamp:

02/17/10 02:58:27 (3 years ago)

Author:

drry

Message:

自信ないですが、たぶんこうでしょうか。
違ったら取り消しよろしくお願いします。

Files:

• lang/perl/tiarra/trunk/module/Auto/FetchTitle.pm (modified) (1 diff)

lang/perl/tiarra/trunk/module/Auto/FetchTitle.pm

@@ -1836 +1836 @@
   }
   $path =~ s/[\?#].*//;
-  $path =~ s{[^/]$}{};
+  $path =~ s{/$}{};
   ($scheme, $domain, $path);
 }