Fixed bugs reported by Andreas when reloading settings from a file (white spaces in string issues).
This commit is contained in:
parent
ef519149ac
commit
b502cc8585
@ -1,6 +1,6 @@
|
||||
# Form implementation generated from reading ui file 'TrimSPGUI.ui'
|
||||
#
|
||||
# Created: Fri Aug 6 11:12:44 2010
|
||||
# Created: Fri Sep 3 18:08:30 2010
|
||||
# by: The PerlQt User Interface Compiler (puic)
|
||||
#
|
||||
# WARNING! All changes made in this file will be lost!
|
||||
@ -2647,6 +2647,8 @@ sub OpenFile
|
||||
close(INF);
|
||||
my $Attrib="";
|
||||
foreach my $line (@lines) {
|
||||
# Remove white spaces
|
||||
$line =~ s/\s+//g;
|
||||
my @InitPar = split (/=/,$line);
|
||||
# Check it is not empty or title line
|
||||
if ($InitPar[0] ne "" && $InitPar[1] ne "") {
|
||||
|
@ -699,6 +699,8 @@ void TrimSPGUI::OpenFile()
|
||||
close(INF);
|
||||
my $Attrib="";
|
||||
foreach my $line (@lines) {
|
||||
# Remove white spaces
|
||||
$line =~ s/\s+//g;
|
||||
my @InitPar = split (/=/,$line);
|
||||
# Check it is not empty or title line
|
||||
if ($InitPar[0] ne "" && $InitPar[1] ne "") {
|
||||
|
Loading…
x
Reference in New Issue
Block a user