Bugfixing

diff --git a/lib/FrBr/Books/Controller/Books.pm b/lib/FrBr/Books/Controller/Books.pm
index 93cb7a1678616348f03cf8b5254977e58c7d88de..20774ad053db27f4a047fc64926998cdb66250a4 100644 (file)
--- a/lib/FrBr/Books/Controller/Books.pm
+++ b/lib/FrBr/Books/Controller/Books.pm
@@ -483,8 +483,11 @@ sub form_new : Path('new') {
         'name' => "Neu"
     };
 
+    $c->log->debug( $K . "Check for «new» buttons ..." ) if $c->stash->{'debug_level'} > 2;
+
        # Es wurde auf "Neuer Autor" geklickt.
        if ( $c->request->params->{'neuer_autor'} ) {
+       $c->log->debug( $K . "Auf neuen Autor geklickt ..." ) if $c->stash->{'debug_level'} > 2;
                $c->session->{'form'} = {} unless $c->session->{'form'};
                $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
                $c->session->{'form'}{'buch'}{'neuer_autor_angefordert'} = 1;
@@ -493,8 +496,20 @@ sub form_new : Path('new') {
                return 1;
        }
 
+       # Es wurde auf "Neuer Verlag" geklickt.
+       if ( $c->request->params->{'neuer_verlag'} ) {
+       $c->log->debug( $K . "Auf neuen Verlag geklickt ..." ) if $c->stash->{'debug_level'} > 2;
+               $c->session->{'form'} = {} unless $c->session->{'form'};
+               $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
+               $c->session->{'form'}{'buch'}{'neuer_verlag_angefordert'} = 1;
+               $self->bookdata_cgi2session($c);
+               $c->response->redirect( $c->web_path( '/verlag/new', { 'return_target_form' => $c->stash->{'self_url'} } ) );
+               return 1;
+       }
+
        # Es wurde auf "Neuer Aufbewahrungsort" geklickt.
        if ( $c->request->params->{'neuer_aufbewahrungsort'} ) {
+       $c->log->debug( $K . "Auf neuen Aufbewahrungsort geklickt ..." ) if $c->stash->{'debug_level'} > 2;
                $c->session->{'form'} = {} unless $c->session->{'form'};
                $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
                $c->session->{'form'}{'buch'}{'neuer_ort_angefordert'} = 1;
@@ -505,6 +520,7 @@ sub form_new : Path('new') {
 
        # Es wurde auf "Neue Kategorie" geklickt.
        if ( $c->request->params->{'neue_kategorie'} ) {
+       $c->log->debug( $K . "Auf neue Kategorie geklickt ..." ) if $c->stash->{'debug_level'} > 2;
                $c->session->{'form'} = {} unless $c->session->{'form'};
                $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
                $c->session->{'form'}{'buch'}{'neue_kategorie_angefordert'} = 1;
@@ -515,6 +531,7 @@ sub form_new : Path('new') {
 
        # Es wurde auf "Neue Buchserie" geklickt.
        if ( $c->request->params->{'neue_serie'} ) {
+       $c->log->debug( $K . "Auf neue Buchserie geklickt ..." ) if $c->stash->{'debug_level'} > 2;
                $c->session->{'form'} = {} unless $c->session->{'form'};
                $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
                $c->session->{'form'}{'buch'}{'neue_serie_angefordert'} = 1;
@@ -525,6 +542,7 @@ sub form_new : Path('new') {
 
        # Es wurde auf "Neue Währung" geklickt.
        if ( $c->request->params->{'neue_waehrung'} ) {
+       $c->log->debug( $K . "Auf neue Waehrung geklickt ..." ) if $c->stash->{'debug_level'} > 2;
                $c->session->{'form'} = {} unless $c->session->{'form'};
                $c->session->{'form'}{'buch'} = {} unless $c->session->{'form'}{'buch'};
                $c->session->{'form'}{'buch'}{'neue_waehrung_angefordert'} = 1;
@@ -563,7 +581,7 @@ sub form_new : Path('new') {
 
     $c->stash->{'return_target_action'} = $c->session->{'return_target_new'};
     my $res = $self->do_save_book($c);
-    delete $c->session->{'book_list_page'} if $res and exists $c->session->{'book_list_page'};
+    #delete $c->session->{'book_list_page'} if $res and exists $c->session->{'book_list_page'};
     return $res;
 
 }
@@ -1435,4 +1453,4 @@ it under the same terms as Perl itself.
 
 __END__
 
-# vim: noai : ts=4 fenc=utf-8 filetype=perl
+# vim: noai : ts=4 fenc=utf-8 filetype=perl expandtab

diff --git a/root/src/books/form.tt2 b/root/src/books/form.tt2
index 94b62659f4af5ae763c3e58ecde4d78d6b2bc7af..7a13c3a683b53adb5faa0daae92b92347e51a175 100644 (file)
--- a/root/src/books/form.tt2
+++ b/root/src/books/form.tt2
@@ -16,7 +16,7 @@ Buch-Formular
 <script type="text/javascript">//<![CDATA[
 
 function goto_new_verlag() {
-    var target = '[% Catalyst.web_path( '/verlag/new', { 'return_target_form' => self_url } ) %]';
+    var target = '[% Catalyst.web_path( '/verlag/new', { 'return_target_form' => self_url, 'neuer_verlag' => 1 } ) %]';
     window.location.href = target;
 }
 
@@ -83,13 +83,13 @@ function goto_new_ort() {
       <td><select name="verlags_id" size="1">
             <option value="">-- Verlag auswählen --</option>[% FOR verlagsid IN verlags_ids %]
             <option value="[% verlagsid %]"[% IF book_edit.verlags_id == verlagsid %] selected[% END %]>[% verlagsliste.$verlagsid %]</option>[% END %]
-          </select>&nbsp;<input type="button" name="neuer_verlag" value="*" class="shift_button" title="Neuer Verlag" onclick="goto_new_verlag();" /></td>
+          </select>&nbsp;<input type="submit" name="neuer_verlag" value="*" class="shift_button" title="Neuer Verlag"/></td>
     </tr><tr>
       <th>Aufbewahrungsort:</th>
       <td><select name="orts_id" size="1">
             <option value="">-- Aufbewahrungsort auswählen --</option>[% FOR ortsid IN orts_ids %]
             <option value="[% ortsid %]"[% IF book_edit.orts_id == ortsid %] selected[% END %]>[% ortsliste.$ortsid %]</option>[% END %]
-          </select>&nbsp;<input type="button" name="neuer_aufbewahrungsort" value="*" class="shift_button" title="Neuer Aufbewahrungsort" onclick="goto_new_ort();" /></td>
+          </select>&nbsp;<input type="submit" name="neuer_aufbewahrungsort" value="*" class="shift_button" title="Neuer Aufbewahrungsort" /></td>
     </tr><tr>
       <th>Bindungsart:</th>
       <td><select name="bindungsart_id" size="1">