From rangi@users.sourceforge.net Wed Mar  7 13:01:07 2001
From: Chris Cornack <rangi@users.sourceforge.net>
To: koha-devel@lists.koha-community.org
Subject: [Koha-devel] CVS: koha moremember.pl,1.3,1.4
Date: Wed, 07 Mar 2001 13:02:50 -0800
Message-ID: <E14al58-0006OC-00@usw-pr-cvs1.sourceforge.net>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="===============7189400790411869734=="

--===============7189400790411869734==
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: quoted-printable

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv24495

Modified Files:
	moremember.pl=20
Log Message:
Changing the form so it passes through a modify value to tell the script to s=
how the flags



Index: moremember.pl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** moremember.pl	2001/02/21 22:17:58	1.3
--- moremember.pl	2001/03/07 21:02:48	1.4
***************
*** 15,18 ****
--- 15,19 ----
  use C4::Reserves2;
  use C4::Circulation::Renewals2;
+ use C4::Circulation::Circ2;
  my $input =3D new CGI;
  my $bornum=3D$input->param('bornum');
***************
*** 96,102 ****
  <form action=3D/cgi-bin/koha/memberentry.pl method=3Dpost>
  <input type=3Dhidden name=3Dbornum value=3D$bornum>
! <INPUT TYPE=3D"image" name=3D"submit"  VALUE=3D"modify" height=3D42  WIDTH=
=3D93 BORDER=3D0 src=3D"/images/modify-mem.gif">=20
 =20
! <INPUT TYPE=3D"image" name=3D"submit"  VALUE=3D"delete" height=3D42  WIDTH=
=3D93 BORDER=3D0 src=3D"/images/delete-mem.gif">=20
  </p>
 =20
--- 97,103 ----
  <form action=3D/cgi-bin/koha/memberentry.pl method=3Dpost>
  <input type=3Dhidden name=3Dbornum value=3D$bornum>
! <INPUT TYPE=3D"image" name=3D"modify"  VALUE=3D"modify" height=3D42  WIDTH=
=3D93 BORDER=3D0 src=3D"/images/modify-mem.gif">=20
 =20
! <INPUT TYPE=3D"image" name=3D"delete"  VALUE=3D"delete" height=3D42  WIDTH=
=3D93 BORDER=3D0 src=3D"/images/delete-mem.gif">=20
  </p>
 =20
***************
*** 132,136 ****
      print "<td>$accts->[$i]{'date'}</td>";
  #  print "<TD>$accts->[$i]{'accounttype'}</td>";
!     print "<TD>$accts->[$i]{'description'} $accts->[$i]{'title'}</td>
      <TD>$amount</td><td>$amount2</td>
      </tr>";
--- 133,143 ----
      print "<td>$accts->[$i]{'date'}</td>";
  #  print "<TD>$accts->[$i]{'accounttype'}</td>";
!     print "<TD>";
!     my $env;
!     if ($accts->[$i]{'accounttype'} ne 'Res'){
!       my $iteminfo=3DC4::Circulation::Circ2::getiteminformation($env,$accts=
->[$i]->{'itemnumber'},'');
!       print "<a href=3D/cgi-bin/koha/moredetail.pl?itemnumber=3D$accts->[$i=
]->{'itemnumber'}&bib=3D$iteminfo->{'biblionumber'}&bi=3D$iteminfo->{'biblioi=
temnumber'}>$accts->[$i]->{'description'} $accts->[$i]{'title'}</a>";
!     }
!     print "</td>
      <TD>$amount</td><td>$amount2</td>
      </tr>";



--===============7189400790411869734==--