Bug fix for bug 524

diff --git a/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl b/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl
index af80193..12f0a9e 100644 (file)
--- a/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl
+++ b/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl
@@ -74,7 +74,7 @@
                <TMPL_ELSE>
                        <form action=/cgi-bin/koha/memberentry.pl method=post>
                                <input type=hidden name=bornum value="<TMPL_VAR NAME="bornum">">
-                               <INPUT TYPE=submit class="button" value="Modify">
+                               <INPUT TYPE=submit class="button" name="modify" value="Modify">
                        </form>
                </TMPL_IF>
                <form action=/cgi-bin/koha/deletemem.pl method=post>

diff --git a/memberentry.pl b/memberentry.pl
index b07372b..2fa8ce1 100755 (executable)
--- a/memberentry.pl
+++ b/memberentry.pl
@@ -54,8 +54,8 @@ if ($member eq ''){
        $member=NewBorrowerNumber();
 }
 my $type=$input->param('type') || '';
-my $modify=$input->param('modify.x');
-my $delete=$input->param('delete.x');
+my $modify=$input->param('modify');
+my $delete=$input->param('delete');
 if ($delete){
        print $input->redirect("/cgi-bin/koha/deletemem.pl?member=$member");
 } else {  # this else goes down the whole script
@@ -180,6 +180,7 @@ if ($delete){
                                cardnumber      => $cardnumber,
                                dateofbirth     => $data->{'dateofbirth'},
                                dateformat      => display_date_format(),
+                               modify          => $modify,
                                CGIbranch => $CGIbranch);
        output_html_with_http_headers $input, $cookie, $template->output;