Changeset 45 in bookmarks for trunk/BookmarkApp.pm

Timestamp:

06/03/13 17:43:16 (11 years ago)

Author:

peter

Message:

• created a separate edit runmode to edit existing bookmarks; handled POST /{id}
• the old edit runmode has been renamed to create, and only handles POST /
• added an update method to the Bookmark class
• the URI field on the bookmark editing form is no longer ever readonly; the URI can be changed after the bookmark has been created
• changes to the URI or the bookmark's tags cause the bookmark's mtime to be updated

File:

• trunk/BookmarkApp.pm (modified) (3 diffs)

trunk/BookmarkApp.pm

@@ -20 +20 @@
         view
         view_field
+        create
         edit
     }]);
@@ -361 +362 @@
 }
 
-#TODO: split this into edit and create methods
-sub edit {
+sub create {
     my $self = shift;
     my $q = $self->query;
-    #TODO: get the bookmark based on the id and edit it directly?
-    #TODO: deal with changing URIs
     my $uri = $q->param('uri');
     my $title = $q->param('title');
@@ -392 +390 @@
 }
 
+sub edit {
+    my $self = shift;
+    my $q = $self->query;
+    my $id = $self->param('id');
+
+    my $bookmark = $self->_bookmarks->get_bookmark({ id => $id });
+    if ($bookmark) {
+        # update the URI, title, and tags
+        $bookmark->uri($q->param('uri'));
+        $bookmark->title($q->param('title'));
+        $bookmark->tags([ split(' ', $q->param('tags')) ]);
+        $bookmark->update($self->_bookmarks->dbh);
+
+        # return to the form
+        $self->header_type('redirect');
+        $self->header_props(
+            -uri => $bookmark->bookmark_uri->canonical,
+            -status => 303,
+        );
+    } else {
+        $self->header_props(
+            -type    => 'text/html',
+            -charset => 'UTF-8',
+            -status  => 404,
+        );
+        return "Bookmark $id Not Found";
+    }
+}
+
 1;