Changeset 23657

Timestamp:

11/14/08 17:24:39 (5 years ago)

Author:

tokuhirom

Message:

r30511@skinny: tokuhirom | 2008-11-14 12:03:16 +0900
added load_plugins.

Location:

lang/perl/MENTA/trunk

Files:

• NOTE (modified) (1 diff)
• app/controller/users.pl (modified) (1 diff)
• app/menta.cgi (modified) (1 diff)
• lib/MENTA.pm (modified) (1 diff)

lang/perl/MENTA/trunk/NOTE

@@ -48 +48 @@
     mod_perl 対応。今の時点でも動くことはうごくとおもうけど、テストとか十分にしたい
     load_plugin('mail') とかの方がベター
+    携帯端末の場合に文字コードを適切に変換するべき?でも 3G なら utf8 表示できるんじゃなかったっけw
 

lang/perl/MENTA/trunk/app/controller/users.pl

@@ -1 @@
-require "../plugins/dbi_select.pl";
+load_plugin("dbi_select");
 
 sub do_users {

lang/perl/MENTA/trunk/app/menta.cgi

@@ -4 +4 @@
 # -- ここまではおまじない --
 
-require "../plugins/mail.pl";
+load_plugin("mail");
 
 run_menta({

lang/perl/MENTA/trunk/lib/MENTA.pm

@@ -329 +329 @@
 }
 
+sub load_plugin {
+    my $plugin = shift;
+    require_once("../plugins/$plugin.pl");
+}
+
 1;