Drinker uses add_to_from_cgi and other stuff. Now it is a nice working

[maypole.git] / ex / fancy_example / BeerDB / Base.pm

diff --git a/ex/fancy_example/BeerDB/Base.pm b/ex/fancy_example/BeerDB/Base.pm
index 0f980d9892b5692de1fcf734e4cdcf8152beee59..23b1dd132104360f4847ace269287494d441ac6b 100644 (file)
--- a/ex/fancy_example/BeerDB/Base.pm
+++ b/ex/fancy_example/BeerDB/Base.pm
@@ -15,4 +15,19 @@ sub list : Exported {
        $r->template_args->{classmetadata}{cgi} = { $self->to_cgi(@cols) }; 
 }
 
+
+# Template switcheroo bug bit me -- was seeing view page but the view action was never 
+# being executed after an edit.
+sub do_edit : Exported {
+       my ($self, $r) = (shift, shift);
+       $self->SUPER::do_edit($r, @_);
+       if (my $obj = $r->object) {
+               my $url = $r->config->uri_base . "/" . $r->table . "/view/" . $obj->id;
+               $r->redirect_request(url => $url);
+       }
+}
+
+sub metadata: Exported {}
+       
+
 1;