summaryrefslogtreecommitdiff
path: root/wps/wpsbuild.pl
diff options
context:
space:
mode:
authorThomas Martitz <kugel@rockbox.org>2013-05-06 07:20:40 +0200
committerThomas Martitz <kugel@rockbox.org>2014-03-03 15:14:16 +0100
commit05a67d021c8fbb10b2654f8378b549901dd4c520 (patch)
tree23d0fa787d7373bf2ea08d1678cff47306a1a55d /wps/wpsbuild.pl
parent20e114c1a0f086e432f374fe0ecebf014a571448 (diff)
downloadrockbox-05a67d021c8fbb10b2654f8378b549901dd4c520.tar.gz
rockbox-05a67d021c8fbb10b2654f8378b549901dd4c520.zip
Touchscreen: Show a line separator in lists.
This patch adds a configurable line separator between list items, very similar to lists in Android. Additionally, below the list item there is a thicker line. It can be disabled in the settings. Its color can be configured as well. Remote and monochrome displays are explicitly unsupported. If there is desire this can be changed but it doesn't seem useful to me. Change-Id: I005313b0d8f5ecd15864bf20e66ea4e3390d8b7d
Diffstat (limited to 'wps/wpsbuild.pl')
-rwxr-xr-xwps/wpsbuild.pl13
1 files changed, 13 insertions, 0 deletions
diff --git a/wps/wpsbuild.pl b/wps/wpsbuild.pl
index d6d8085449..52492f6b71 100755
--- a/wps/wpsbuild.pl
+++ b/wps/wpsbuild.pl
@@ -55,6 +55,8 @@ my $font;
55my $remotefont; 55my $remotefont;
56my $fgcolor; 56my $fgcolor;
57my $bgcolor; 57my $bgcolor;
58my $sepcolor;
59my $sep;
58my $statusbar; 60my $statusbar;
59my $remotestatusbar; 61my $remotestatusbar;
60my $author; 62my $author;
@@ -291,6 +293,9 @@ MOO
291 push @out, "line selector start color: $lineselectstart\n" if($lineselectstart); 293 push @out, "line selector start color: $lineselectstart\n" if($lineselectstart);
292 push @out, "line selector end color: $lineselectend\n" if($lineselectend);; 294 push @out, "line selector end color: $lineselectend\n" if($lineselectend);;
293 push @out, "line selector text color: $lineselecttextcolor\n" if($lineselecttextcolor); 295 push @out, "line selector text color: $lineselecttextcolor\n" if($lineselecttextcolor);
296 # list separator actually depends on HAVE_TOUCSCREEN
297 push @out, "list separator height: $sep\n" if($sep);
298 push @out, "list separator color: $sepcolor\n" if($sepcolor);
294 } 299 }
295 300
296 push @out, "font: $font\n" if (defined($font)); 301 push @out, "font: $font\n" if (defined($font));
@@ -430,6 +435,8 @@ while(<WPS>) {
430 undef $remotefont; 435 undef $remotefont;
431 undef $fgcolor; 436 undef $fgcolor;
432 undef $bgcolor; 437 undef $bgcolor;
438 undef $sepcolor;
439 undef $sep;
433 undef $statusbar; 440 undef $statusbar;
434 undef $remotestatusbar; 441 undef $remotestatusbar;
435 undef $author; 442 undef $author;
@@ -502,6 +509,12 @@ while(<WPS>) {
502 elsif($l =~ /^Background Color: *(.*)/i) { 509 elsif($l =~ /^Background Color: *(.*)/i) {
503 $bgcolor = $1; 510 $bgcolor = $1;
504 } 511 }
512 elsif($_ = check_res_feature($l, "list separator color")) {
513 $sepcolor = $_;
514 }
515 elsif($_ = check_res_feature($l, "list separator height")) {
516 $sep = $_;
517 }
505 elsif($l =~ /^line selector start color: *(.*)/i) { 518 elsif($l =~ /^line selector start color: *(.*)/i) {
506 $lineselectstart = $1; 519 $lineselectstart = $1;
507 } 520 }