Index: /trunk/bkmk
===================================================================
--- /trunk/bkmk	(revision 85)
+++ /trunk/bkmk	(revision 86)
@@ -26,5 +26,7 @@
 my %action_for = (
     init => sub {
+        my $src_file = shift;
         $bookmarks->create_tables;
+        load_bookmarks($src_file) if $src_file;
     },
     
@@ -69,8 +71,5 @@
     load => sub {
         my ($src_file) = @_;
-        my $src_bookmarks = YAML::LoadFile($src_file);
-        for my $bookmark (@{ $src_bookmarks }) {
-            $bookmarks->add($bookmark);
-        }
+        load_bookmarks($src_file);
     },
 );
@@ -91,2 +90,10 @@
     return $mech->title || $uri;
 }
+
+sub load_bookmarks {
+    my $src_file = shift;
+    my $src_bookmarks = YAML::LoadFile($src_file);
+    for my $bookmark (@{ $src_bookmarks }) {
+        $bookmarks->add($bookmark);
+    }
+}