Changeset 54 for mt-i18n

Timestamp:

04/24/05 19:16:22 (4 years ago)

Author:

ogawa

Message:

Add package declaration

Files:

• mt-i18n/trunk/mt-i18n.pl (modified) (4 diffs)

mt-i18n/trunk/mt-i18n.pl

@@ -1 @@
-# MT-I18N plugin by Hirotaka Ogawa (http://as-is.net/blog/)
+# MT-I18N plugin for MT::I18N container tags and global filters
 #
-# Release 0.01 (Aug 15, 2004)
+# Release 0.02 (Apr 24, 2005)
 #
 # This software is provided as-is. You may use it for commercial or 
@@ -8 +8 @@
 # Copyright (c) 2004 Hirotaka Ogawa
 
+package MT::Plugin::I18N;
 use strict;
 use MT::Template::Context;
 use MT::I18N;
 
-if (MT->can('add_plugin')) {
+eval("use Storable;");
+if (!$@ && MT->can('add_plugin')) {
     require MT::Plugin;
     my $plugin = new MT::Plugin();
-    $plugin->name("MT-I18N Plugin, v.0.01");
+    $plugin->name("MT-I18N Plugin 0.02");
     $plugin->description("Add MT::I18N container tags and global filters.");
     $plugin->doc_link("http://as-is.net/blog/archives/000900.html");
@@ -78 +80 @@
     defined(my $text = $builder->build($ctx, $tokens))
         or return $ctx->error($builder->errstr);
-    my $length = $args->{'length'};
-    return MT::I18N::first_n_text($text, $length || 20);
+    my $length = $args->{'length'} || 20;
+    return (MT::I18N::length_text($text) > $length) ?
+        MT::I18N::first_n_text($text, $length) . '...' : $text;
 });
 
@@ -85 +88 @@
     my ($text, $length, $ctx) = @_;
     $length ||= 20;
-    if (MT::I18N::length_text($text) > $length) {
-        return MT::I18N::first_n_text($text, $length) . '...';
-    } else {
-        return $text;
-    }
+    return (MT::I18N::length_text($text) > $length) ?
+        MT::I18N::first_n_text($text, $length) . '...' : $text;
 });