From ca0302ac944c03de800d4b5de718edfe16a660a5 Mon Sep 17 00:00:00 2001
From: Hardeep Sidhu <dyp@pobox.com>
Date: Wed, 14 Jun 2006 22:06:11 +0000
Subject: Added iCatcher and UniCatcher themes by Ioannis Koutoulakis.  Also
 updated wpsbuild to support different fonts for same theme depending on
 target screen.

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@10120 a1c6a512-1295-4272-9138-f99709370657
---
 wps/wpsbuild.pl | 25 ++++++++++++++-----------
 1 file changed, 14 insertions(+), 11 deletions(-)

(limited to 'wps/wpsbuild.pl')

diff --git a/wps/wpsbuild.pl b/wps/wpsbuild.pl
index 03a1f664d5..0334133aa6 100755
--- a/wps/wpsbuild.pl
+++ b/wps/wpsbuild.pl
@@ -121,10 +121,10 @@ sub copywps {
         # print "$req_t_wps $req_g_wps\n";
 
         if (-e "$dir/$req_t_wps" ) {
-	    system("cp $dir/$req_t_wps .rockbox/wps/$wps");
+          system("cp $dir/$req_t_wps .rockbox/wps/$wps");
 
-	} elsif (-e "$dir/$req_g_wps") {
-	    system("cp $dir/$req_g_wps .rockbox/wps/$wps");
+        } elsif (-e "$dir/$req_g_wps") {
+           system("cp $dir/$req_g_wps .rockbox/wps/$wps");
 
            open(WPSFILE, "$dir/$req_g_wps");
            while (<WPSFILE>) {
@@ -215,7 +215,7 @@ while(<WPS>) {
         undef $statusbar;
         undef $author;
         undef $req_g_wps;
-	undef $req_t_wps;
+        undef $req_t_wps;
         next;
     }
     if($within) {
@@ -239,15 +239,15 @@ while(<WPS>) {
             }
             $wpslist =~ /(.*)WPSLIST/;
             my $wpsdir = $1;
-	    # If this WPS installable on this platform, one of the following
-	    # two files will be present
-	    foreach $d (@depthlist) {
+        # If this WPS installable on this platform, one of the following
+        # two files will be present
+        foreach $d (@depthlist) {
                 next if ($d > $rdepth); 
 
-    	        $req_g = $rwidth . "x" . $rheight . "x" . $d;
+                $req_g = $rwidth . "x" . $rheight . "x" . $d;
 
-    	        $req_g_wps = $wps_prefix . "." . $req_g . ".wps";
-		last if (-e "$wpsdir/$req_g_wps"); 
+                $req_g_wps = $wps_prefix . "." . $req_g . ".wps";
+                last if (-e "$wpsdir/$req_g_wps"); 
             } 
             $req_t_wps = $wps_prefix . ".txt" . ".wps";
 
@@ -270,7 +270,7 @@ while(<WPS>) {
             }
             else {
                 #print "(${wps_prefix}-${rwidth}x${rheight}x$rdepth) "; 
-		print "Skip $wps due to size restraints\n";
+                print "Skip $wps due to size restraints\n";
             }
             $within = 0;
         }
@@ -296,6 +296,9 @@ while(<WPS>) {
         elsif($l =~ /^Font: (.*)/i) {
             $font = $1;
         }
+        elsif($l =~ /^Font\.${main_width}x${main_height}x$main_depth: (.*)/i) {
+            $font = $1;
+        }
         elsif($l =~ /^Statusbar: (.*)/i) {
             $statusbar = $1;
         }
-- 
cgit v1.2.3