[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/suggestion acceptorreject.pl [rel_3_0]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/suggestion acceptorreject.pl [rel_3_0] |
Date: |
Wed, 24 Jan 2007 13:55:55 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: paul poulain <tipaul> 07/01/24 13:55:55
Modified files:
suggestion : acceptorreject.pl
Log message:
ACQUISITION bugfixes
bugfixing templates to have suggestions working...
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/suggestion/acceptorreject.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.4.2.4&r2=1.4.2.5
Patches:
Index: acceptorreject.pl
===================================================================
RCS file: /sources/koha/koha/suggestion/acceptorreject.pl,v
retrieving revision 1.4.2.4
retrieving revision 1.4.2.5
diff -u -b -r1.4.2.4 -r1.4.2.5
--- acceptorreject.pl 19 Dec 2006 15:03:38 -0000 1.4.2.4
+++ acceptorreject.pl 24 Jan 2007 13:55:55 -0000 1.4.2.5
@@ -17,7 +17,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: acceptorreject.pl,v 1.4.2.4 2006/12/19 15:03:38 toins Exp $
+# $Id: acceptorreject.pl,v 1.4.2.5 2007/01/24 13:55:55 tipaul Exp $
=head1 NAME
@@ -86,9 +86,7 @@
my $isbn = $input->param('isbn');
my $status = $input->param('status');
my $suggestedbyme = $input->param('suggestedbyme');
-my $op = $input->param('op');
-#$op = 'else' unless $op;
-warn "op is =>" . $op;
+my $op = $input->param('op') || "aorr_confirm";
my $dbh = C4::Context->dbh;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
@@ -141,10 +139,6 @@
$template->param(done => 1);
}
-if (not defined $op) {
- $suggestions = &SearchSuggestion( "", "", "", "", 'ASKED', "" );
-}
-
my $reasonsloop = GetAuthorisedValues("SUGGEST");
my @suggestions_loop;
foreach my $suggestion (@$suggestions) {
@@ -152,8 +146,6 @@
push @suggestions_loop, $suggestion;
}
-warn "suggestion=>" . Data::Dumper::Dumper(address@hidden);
-
$template->param(
suggestions_loop => address@hidden,
"op_$op" => 1,
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/suggestion acceptorreject.pl [rel_3_0],
paul poulain <=