fix --help output to be proper UTF-8

[clawsker.git] / clawsker

diff --git a/clawsker b/clawsker
index f628046e6847bc952356bd5cd2096997ca1f9f3c..8fa67976b4a833da21169cd81c2202f60543b18d 100755 (executable)
--- a/clawsker
+++ b/clawsker
@@ -8,6 +8,7 @@ use Glib qw(TRUE FALSE);
 use Gtk2 -init;
 use POSIX qw(setlocale);
 use Locale::gettext;
+use Encode;
 
 my $NAME = 'clawsker';
 my $PREFIX = '@PREFIX@';
@@ -35,7 +36,7 @@ sub _ {
             $xla =~ s/\{$key\}/$par{$key}/g;
         }
     }
-    return $xla;
+    return decode_utf8($xla);
 }
 
 # default messages
@@ -406,6 +407,7 @@ sub new_text_box_for_int {
     my $pagei = int (($type[2] - $type[1]) / 10);
     my $gentry = Gtk2::SpinButton->new_with_range ($type[1], $type[2], $pagei);
     $gentry->set_numeric (TRUE);
+    $gentry->set_value ($HPVALUE{$name});
     $$hash{$key}[GUI] = $gentry;
     $gentry->signal_connect('value-changed' => sub {
             my ($w, $e) = @_;
@@ -637,7 +639,7 @@ sub new_other_page() {
         'stripes_color_offset',
         $xl::s{l_gui_strip_off},
         $xl::s{h_gui_strip_off},
-        'int,0,10000', # no idea what this number means
+        'int,0,40000', # no idea what this number means
         '0.0.0',
         '4000',
         undef,
@@ -1900,7 +1902,7 @@ GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
 along with this program.  If not, see <http://www.gnu.org/licenses/>.";
-    my $year = "2007-2011";
+    my $year = "2007-2012";
     my $holder = "Ricardo Mones <ricardo\@mones.org>";
     my $url = "http://www.claws-mail.org/clawsker";