From e0a26680d75fc2000bde195eba7946805a3aaa28 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 28 Mar 2011 02:00:53 +0000
Subject: finish existing customer dsl order, RT#7111

---
 httemplate/view/cust_main/order_pkg_link.html | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'httemplate/view/cust_main')

diff --git a/httemplate/view/cust_main/order_pkg_link.html b/httemplate/view/cust_main/order_pkg_link.html
index 2e8b1dac1..ba731ae11 100644
--- a/httemplate/view/cust_main/order_pkg_link.html
+++ b/httemplate/view/cust_main/order_pkg_link.html
@@ -6,7 +6,7 @@
               'cust_main'   => $cust_main,
               'closetext'   => 'Close',
               'width'       => 763,
-              'height'      => 538,
+              'height'      => $height,
 	      %optional,
           )
 %>
@@ -14,9 +14,10 @@
 
 my($cust_main, %opt) = @_;
 
-my %optional = ();
-$optional{'pkgpart'} = $opt{'pkgpart'} if $opt{'pkgpart'};
-$optional{'locationnum'} = $opt{'locationnum'} if $opt{'locationnum'};
-$optional{'svcpart'} = $opt{'svcpart'} if $opt{'svcpart'};
+my %optional = map { $_ => $opt{$_} }
+                 grep $opt{$_},
+                   qw( lock_pkgpart lock_locationnum qualnum svcpart );
+
+my $height = $opt{'lock_locationnum'} ? 296 : 538;
 
 </%init>
-- 
cgit v1.2.1