Changeset 18180 for lang/actionscript/todoshare/todo.cgi

Timestamp:

08/24/08 18:17:29 (5 months ago)

Author:

hoge1e3

Message:

 

Files:

• lang/actionscript/todoshare/todo.cgi (modified) (4 diffs)

lang/actionscript/todoshare/todo.cgi

@@ -23 +23 @@
 my $br=["br","\n"];
 my $script="todo.cgi";
-my $todoClass="class://Todo";
-my $eventClass="class://Event";
+my $todoClass="Todo";
+my $eventClass="Event";
 my $notice= "※内容を記入すると「追加」，空欄にすると「参照」になります";
 if    ($in->{todoName}) {&add;}
@@ -48 +48 @@
    my $todo=&Obj::newID($todoClass);
    &Obj::exe(["INSERT2",$todo,{
-      class=>$todoClass,
+      category=>$todoClass,
       content=>$in->{todoName}
    }]);
@@ -55 +55 @@
      $when=&Obj::newID($eventClass);
      &Obj::exe(["INSERT2",$when,{
-       class=>$eventClass,
+       category=>$eventClass,
        content=>$in->{whenText}
      }]);
@@ -84 +84 @@
                      my $out=shift;
                      my $res=&Obj::exe(["GET2",
-                        ["class", "content"],
+                        ["category", "content"],
                         {
-                           class => $eventClass,
+                           category => $eventClass,
                         },1
                      ]);