Commit 623b9b64 authored by Ruslan Zakirov's avatar Ruslan Zakirov
Browse files

get rid of errorless uninit warnings

git-svn-id: svn+ssh://svn.bestpractical.com/svn/bps-public/rt/branches/3.7-EXPERIMENTAL@4282 e417ac7c-1bcc-0310-8ffa-8f5827389a85
parent d146ae92
......@@ -58,11 +58,11 @@ $False => loc("isn't")
</%ARGS>
<%INIT>
my ($TrueDefault, $FalseDefault);
my ($TrueDefault, $FalseDefault) = ('', '');
if ($Default && $Default !~ /true/i) {
$FalseDefault = "SELECTED";
$FalseDefault = "selected";
}
else {
$TrueDefault = "SELECTED";
$TrueDefault = "selected";
}
</%INIT>
......@@ -223,11 +223,13 @@ elsif ( $ColDown ) {
my @format_string;
foreach my $field (@seen) {
next unless $field;
my $row = "'" . $field->{Prefix};
my $row = "'";
$row .= $field->{Prefix} if defined $field->{Prefix};
$row .= "__" . ($field->{Column} =~ m/\(/ ? $field->{Column} # func, don't escape
: $m->interp->apply_escapes( $field->{Column}, 'h' )) . "__"
unless ( $field->{Column} eq "<blank>" );
$row .= $field->{Suffix} . "'";
$row .= $field->{Suffix} if defined $field->{Suffix};
$row .= "'";
push( @format_string, $row );
}
......
......@@ -47,6 +47,6 @@
<& TitleBoxStart, %ARGS &><% $m->content | n %><& TitleBoxEnd &>
</div>
<%ARGS>
$class => undef
$class => ''
</%ARGS>
......@@ -55,16 +55,16 @@
<%ARGS>
$width => undef
$class => undef
$bodyclass => undef
$title_href => undef
$title => undef
$class => ''
$bodyclass => ''
$title_href => ''
$title => ''
$title_class => ''
$titleright_href => undef
$titleright => undef
$titleright_href => ''
$titleright => ''
$contentbg => "#dddddd"
$color => "#336699"
$id => undef
$id => ''
$hideable => 1
</%ARGS>
......
......@@ -1577,15 +1577,9 @@ container object and the search id.
=cut
sub _parse_saved_search {
my $spec = shift;
if ($spec !~ /^(.*?)-(\d+)-SavedSearch-(\d+)$/ ) {
return;
}
my $obj_type = $1;
my $obj_id = $2;
my $search_id = $3;
return (_load_container_object ($obj_type, $obj_id), $search_id);
my $spec = shift || '';
return unless $spec =~ /^(.*?)-(\d+)-SavedSearch-(\d+)$/;
return (_load_container_object ($1, $2), $3);
}
eval "require RT::Interface::Web_Vendor";
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment