# HG changeset patch
# User robert
# Date 1251744795 14400
# Node ID c702488ef7954f6f2190bb1ed22126dbe9727749
# Parent 477258d0935321670ef2a7115cc5f0d7ce6e312a
[svn r3] modified
diff -r 477258d09353 -r c702488ef795 cards.html
--- a/cards.html Sun Aug 30 02:19:26 2009 -0400
+++ b/cards.html Mon Aug 31 14:53:15 2009 -0400
@@ -3,7 +3,7 @@
<head>
<title>
-Edit Pokèmon Cards
+Edit Pokèmon Cards~
</title>
diff -r 477258d09353 -r c702488ef795 cards.pl
--- a/cards.pl Sun Aug 30 02:19:26 2009 -0400
+++ b/cards.pl Mon Aug 31 14:53:15 2009 -0400
@@ -7,7 +7,7 @@
my $q = new CGI;
-my %hash = ( 'card_list' => \&work, 'current_card' => \&funtwo);
+my %hash = ( 'card_list' => \&CardList, 'display_card' => \&DisplayCard , 'tags' => \&getAllTags);
@@ -21,31 +21,25 @@
-sub funtwo
+sub getAllTags
{
return 14;
};
-sub work
+sub DisplayCard
{
return 13;
};
-
-
-
-
-
-
-
-
-
-
-
-
+sub CardList
+{
+
+ return 15;
+
+};
sub gen