projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix weird rounding error:
[freeside.git]
/
httemplate
/
misc
/
link.cgi
diff --git
a/httemplate/misc/link.cgi
b/httemplate/misc/link.cgi
index
f4b70f7
..
801b920
100755
(executable)
--- a/
httemplate/misc/link.cgi
+++ b/
httemplate/misc/link.cgi
@@
-1,5
+1,5
@@
<%
<%
-#<!-- $Id: link.cgi,v 1.
2 2001-08-21 02:31:56
ivan Exp $ -->
+#<!-- $Id: link.cgi,v 1.
4 2001-10-30 14:54:07
ivan Exp $ -->
use strict;
use vars qw ( %link_field $cgi $pkgnum $svcpart $query $part_svc $svc $svcdb
use strict;
use vars qw ( %link_field $cgi $pkgnum $svcpart $query $part_svc $svc $svcdb
@@
-32,7
+32,7
@@
$svc = $part_svc->getfield('svc');
$svcdb = $part_svc->getfield('svcdb');
$link_field = $link_field{$svcdb};
$svcdb = $part_svc->getfield('svcdb');
$link_field = $link_field{$svcdb};
-print
$cgi->header( '-expires' => 'now' ),
header("Link to existing $svc"),
+print header("Link to existing $svc"),
qq!<FORM ACTION="!, popurl(1), qq!process/link.cgi" METHOD=POST>!;
if ( $link_field ) {
qq!<FORM ACTION="!, popurl(1), qq!process/link.cgi" METHOD=POST>!;
if ( $link_field ) {