From: Eric Bollengier Date: Sat, 18 Nov 2006 16:31:55 +0000 (+0000) Subject: ebl add string with space to get_form() X-Git-Tag: Release-2.0.0~270 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=0f8bf3f8bdf38ca22821c13307e2d0785e4361a1;p=bacula%2Fbacula ebl add string with space to get_form() git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@3647 91ce42f0-d328-0410-95d8-f526ca767f89 --- diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm index a38e5fba0c..b7ffb38850 100644 --- a/gui/bweb/lib/Bweb.pm +++ b/gui/bweb/lib/Bweb.pm @@ -1338,6 +1338,10 @@ sub get_form maxvolfiles => 0, ); + my %opt_ss =( # string with space + job => 1, + storage => 1, + ); my %opt_s = ( # default to '' ach => 1, status => 1, @@ -1353,12 +1357,14 @@ sub get_form gtype => 1, type => 1, poolrecycle => 1, + replace => 1, ); my %opt_p = ( # option with path fileset=> 1, mtxcmd => 1, precmd => 1, device => 1, + where => 1, ); my %opt_d = ( # option with date @@ -1377,7 +1383,11 @@ sub get_form if ($value =~ /^([\w\d\.-]+)$/) { $ret{$i} = $1; } - + } elsif ($opt_ss{$i}) { # simple string param (with space) + my $value = CGI::param($i) || ''; + if ($value =~ /^([\w\d\.\-\s]+)$/) { + $ret{$i} = $1; + } } elsif ($i =~ /^j(\w+)s$/) { # quote join args my @value = CGI::param($1) ; if (@value) {