X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=clearadm%2Frunlog.cgi;h=e5e3f56ce11b1b1e681fb5df4b5a7c808f52ac56;hb=HEAD;hp=6080c6b811c0fa5e90c3f7d507cf788b35c4b387;hpb=020a4a5ea2be725b155cae3a2cadc9aba3911b9b;p=clearscm.git diff --git a/clearadm/runlog.cgi b/clearadm/runlog.cgi index 6080c6b..e5e3f56 100755 --- a/clearadm/runlog.cgi +++ b/clearadm/runlog.cgi @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/local/bin/perl =pod @@ -84,14 +84,11 @@ my $title = 'Run Log'; heading $title; -undef $opts{task} - if $opts{task} and $opts{task} eq 'All'; - +$opts{task} ||= 'All'; $opts{system} ||= 'All'; +$opts{not} ||= 0; +$opts{status} ||= 'All'; -undef $opts{status} - if $opts{status} and $opts{status} eq 'All'; - display h1 {class => 'center'}, $title; displayRunlog (%opts); @@ -134,10 +131,10 @@ L =begin html
-Clearadm
-ClearadmWeb
-Display
-Utils
+Clearadm
+ClearadmWeb
+Display
+Utils
=end html @@ -152,4 +149,4 @@ Please report problems to Andrew DeFaria . Copyright (c) 2010, ClearSCM, Inc. All rights reserved. -=cut \ No newline at end of file +=cut