From: ivan <ivan>
Date: Wed, 27 Mar 2002 07:08:08 +0000 (+0000)
Subject: don't show queue arguments (passwords!) on svc_* screens
X-Git-Tag: freeside_1_4_0_pre12~116
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=ab4e2900dd300d5f6e55227cdabb3cf2bf5db7a7

don't show queue arguments (passwords!) on svc_* screens
(unless queue_dangerous_options!)
---

diff --git a/FS/FS/queue.pm b/FS/FS/queue.pm
index e5369cf82..4b880a23c 100644
--- a/FS/FS/queue.pm
+++ b/FS/FS/queue.pm
@@ -251,17 +251,26 @@ END
   $html .= '<TH>Account</TH>' unless $hashref->{svcnum};
   $html .= '</TR>';
 
+  my $dangerous = $conf->exists('queue_dangerous_controls');
+
   my $p = FS::CGI::popurl(2);
   foreach my $queue ( sort { 
     $a->getfield('jobnum') <=> $b->getfield('jobnum')
   } @queue ) {
     my $queue_hashref = $queue->hashref;
     my $jobnum = $queue->jobnum;
-    my $args = join(' ', $queue->args);
+
+    my $args;
+    if ( $dangerous || $queue->job !~ /^FS::part_export::/ || !$noactions ) {
+      $args = join(' ', $queue->args);
+    } else {
+      $args = '';
+    }
+
     my $date = time2str( "%a %b %e %T %Y", $queue->_date );
     my $status = $queue->status;
     $status .= ': '. $queue->statustext if $queue->statustext;
-    if ( $conf->exists('queue_dangerous_controls')
+    if ( $dangerous
          || ( ! $noactions && $status =~ /^failed/ || $status =~ /^locked/ ) ) {
       $status .=
         qq! (&nbsp;<A HREF="$p/misc/queue.cgi?jobnum=$jobnum&action=new">retry</A>&nbsp;|!.
@@ -305,7 +314,7 @@ END
 
 =head1 VERSION
 
-$Id: queue.pm,v 1.9 2002-03-24 14:29:00 ivan Exp $
+$Id: queue.pm,v 1.10 2002-03-27 07:08:08 ivan Exp $
 
 =head1 BUGS