summaryrefslogtreecommitdiff
path: root/wps/wpsbuild.pl
diff options
context:
space:
mode:
Diffstat (limited to 'wps/wpsbuild.pl')
-rwxr-xr-xwps/wpsbuild.pl16
1 files changed, 16 insertions, 0 deletions
diff --git a/wps/wpsbuild.pl b/wps/wpsbuild.pl
index 735a63830a..e9e5c29a30 100755
--- a/wps/wpsbuild.pl
+++ b/wps/wpsbuild.pl
@@ -53,6 +53,8 @@ my $iconset;
53my $viewericon; 53my $viewericon;
54my $lineselecttextcolor; 54my $lineselecttextcolor;
55my $filetylecolor; 55my $filetylecolor;
56my $listviewport;
57my $remotelistviewport;
56 58
57# LCD sizes 59# LCD sizes
58my ($main_height, $main_width, $main_depth); 60my ($main_height, $main_width, $main_depth);
@@ -293,6 +295,12 @@ MOO
293 if($rwps && $has_remote ) { 295 if($rwps && $has_remote ) {
294 push @out, "rwps: /$rbdir/wps/$rwps\n"; 296 push @out, "rwps: /$rbdir/wps/$rwps\n";
295 } 297 }
298 if(defined($listviewport)) {
299 push @out, "ui viewport: $listviewport\n";
300 }
301 if(defined($remotelistviewport) && $has_remote) {
302 push @out, "remote ui viewport: $listviewport\n";
303 }
296 if(-f "$rbdir/wps/$cfg") { 304 if(-f "$rbdir/wps/$cfg") {
297 print STDERR "wpsbuild warning: wps/$cfg already exists!\n"; 305 print STDERR "wpsbuild warning: wps/$cfg already exists!\n";
298 } 306 }
@@ -347,6 +355,8 @@ while(<WPS>) {
347 undef $viewericon; 355 undef $viewericon;
348 undef $lineselecttextcolor; 356 undef $lineselecttextcolor;
349 undef $filetylecolor; 357 undef $filetylecolor;
358 undef $listviewport;
359 undef $remotelistviewport;
350 360
351 next; 361 next;
352 } 362 }
@@ -513,6 +523,12 @@ while(<WPS>) {
513 elsif($l =~ /^filetype colours: *(.*)/i) { 523 elsif($l =~ /^filetype colours: *(.*)/i) {
514 $filetylecolor = $1; 524 $filetylecolor = $1;
515 } 525 }
526 elsif($l =~ /^ui viewport: *(.*)/i) {
527 $listviewport = $1;
528 }
529 elsif($l =~ /^remote ui viewport: *(.*)/i) {
530 $remotelistviewport = $1;
531 }
516 else{ 532 else{
517 #print "Unknown line: $l!\n"; 533 #print "Unknown line: $l!\n";
518 } 534 }