diff options
| author | ivan <ivan> | 2008-04-01 04:37:26 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2008-04-01 04:37:26 +0000 | 
| commit | 69613d0ed870f245f3cd2adf0faaf1b3c1bde3ad (patch) | |
| tree | e2db7bbd8336b6f328bac8e8264b8445a7e7307c /httemplate | |
| parent | 1eb6aa29f466dd7f8218b6a451594b28bb46b0b6 (diff) | |
use popup_link...
Diffstat (limited to 'httemplate')
| -rwxr-xr-x | httemplate/search/cust_pkg.cgi | 31 | 
1 files changed, 12 insertions, 19 deletions
diff --git a/httemplate/search/cust_pkg.cgi b/httemplate/search/cust_pkg.cgi index 20f1154c0..bc2f0cbce 100755 --- a/httemplate/search/cust_pkg.cgi +++ b/httemplate/search/cust_pkg.cgi @@ -209,29 +209,22 @@ sub time_or_blank {     };  } -my $html_init = ''; -for (qw (overlibmws overlibmws_iframe overlibmws_draggable iframecontentmws)) -{ -  $html_init .= -    qq!<SCRIPT TYPE="text/javascript" SRC="$fsurl/elements/$_.js"></SCRIPT>!; -} +my $html_init = include('/elements/init_overlib.html');  my $extra_choices = sub {    my $query = shift; -  my $choices = ''; - -  my $url = qq!overlib( OLiframeContent('!. popurl(2). -            qq!misc/bulk_change_pkg.cgi?$query', 768, 336, !. -            qq!'bulk_pkg_change_popup' ), CAPTION, 'Change Packages'!. -            qq!, STICKY, AUTOSTATUSCAP, MIDX, 0, MIDY, 0, DRAGGABLE, !. -            qq!CLOSECLICK ); return false;!; - -  if ($FS::CurrentUser::CurrentUser->access_right('Bulk change customer packages')) { -    $choices .= qq!<BR><A HREF="javascript:void(0);"!. -                qq!onClick="$url">Change these packages</A>!; -  } -  return $choices; +  return '' unless +   $FS::CurrentUser::CurrentUser->access_right('Bulk change customer packages'); +     +  '<BR><BR>'. +  include( '/elements/popup_link.html', +             'label'       => 'Change these packages', +             'action'      => "${p}misc/bulk_change_pkg.cgi?$query", +             'actionlabel' => 'Change Packages', +             'width'       => 763, +             'height'      => 336, +         );  };  </%init>  | 
