<%
-#
-# $Id: svc_forward.cgi,v 1.1 2001-08-19 15:53:36 jeff Exp $
-#
-# Usage: svc_forward.cgi svcnum
-# http://server.name/path/svc_forward.cgi?svcnum
-#
-# based on view/svc_acct.cgi
-#
-# $Log: svc_forward.cgi,v $
-# Revision 1.1 2001-08-19 15:53:36 jeff
-# added user interface for svc_forward and vpopmail support
-#
-#
+# <!-- $Id: svc_forward.cgi,v 1.4 2001-10-30 14:54:07 ivan Exp $ -->
use strict;
use vars qw($conf $cgi $query $svcnum $svc_forward $cust_svc
or die "Unkonwn svcpart";
$p = popurl(2);
-print $cgi->header( '-expires' => 'now' ), header('Mail Forward View', menubar(
+print header('Mail Forward View', menubar(
( ( $pkgnum || $custnum )
? ( "View this package (#$pkgnum)" => "${p}view/cust_pkg.cgi?$pkgnum",
"View this customer (#$custnum)" => "${p}view/cust_main.cgi?$custnum",