Changeset 4211

Timestamp:

2003-05-01T10:59:34+12:00 (21 years ago)

Author:

mdewsnip

Message:

Improved support for KOI8-R (Russian, some Kazakh) descenders.

Location:

trunk/gsdl/bin/script/gimp

Files:

• flash_button-1.2.pl (modified) (1 diff)
• green_bar-1.2.pl (modified) (1 diff)

trunk/gsdl/bin/script/gimp/flash_button-1.2.pl

@@ -221 +221 @@
 
     my $y_offset = ($height-$textheight)-int($fontsize/5);
-    if ($text =~ /[gjpqyJ]/) { ## capital J is a descender in lucida font
+
+
+    # my $halfdescenders = "";
+    # russian half descenders (KOI8-R)
+    # $halfdescenders .= chr(195) . chr(253);  # Checked
+    # $halfdescenders .= chr(196) . chr(198) . chr(221) . chr(227) . chr(228);  # Unchecked
+
+    # if ($text =~ /[$halfdescenders]/) {
+        # half descenders - put text at fontsize/10 pixels above bottom
+        # $y_offset = ($height-$textheight)-int($fontsize/10);
+    # }
+
+    my $descenders = "";
+    # russian descenders (KOI8-R)
+    # $descenders .= chr(210) . chr(213);
+
+    if ($text =~ /[gjpqyJ$descenders]/) { ## capital J is a descender in lucida font
         # descenders - put text at bottom of image, otherwise 
         # go for fontsize/5 pixels above bottom. This is kind of hacky 

trunk/gsdl/bin/script/gimp/green_bar-1.2.pl

@@ -204 +204 @@
     my $y_offset = ($height-$textheight)-int($fontsize/5);
 
+    # my $halfdescenders = "";
+    # russian half descenders (KOI8-R)
+    # $halfdescenders .= chr(195) . chr(253);  # Checked
+    # $halfdescenders .= chr(196) . chr(198) . chr(221) . chr(227) . chr(228);  # Unchecked
+
+    # if ($text =~ /[$halfdescenders]/) {
+        # half descenders - put text at fontsize/10 pixels above bottom
+        # $y_offset = ($height-$textheight)-int($fontsize/10);
+    # }
+
     my $descenders = "";
-
     # russian descenders (KOI8-R)
-    # $descenders .= chr(0xD2);
-    # $descenders .= chr(0xD5);
+    # $descenders .= chr(210) . chr(213);
 
     if ($text =~ /[gjpqyJ$descenders]/) { ## capital J is a descender in lucida font