fatto stile per la lista di link, messo il JS in file

TODO:
 * search box nella lista tag e links (con auto-complete?)
 * stile delle form

1 files changed, 14 insertions, 0 deletions

diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm
index b272c64..1e2bf54 100644
--- a/lib/Bookmarks/C/Main.pm
+++ b/lib/Bookmarks/C/Main.pm
@@ -265,4 +265,18 @@ sub tag_autocomplete {
     )->as_string();
 }
 
+sub js_library {
+    my ($self)=@_;
+
+    my $ret='';
+    for my $file (qw(prototype scriptaculous)) {
+        $ret.=sprintf(q{<script type="text/javascript" src="%s" ></script>},
+                      URI->new(
+                          $self->{base} . "js/$file.js"
+                      )->as_string()
+                  );
+    }
+    return $ret;
+}
+
 1;