Changeset 180 for trunk/frontends

Timestamp:

02/19/04 04:23:25 (6 years ago)

Author:

martine

Message:

Update to new Cache::Memcached and Gtk2 APIs.

Files:

• trunk/frontends/gtk2-perl/memcachedclient (modified) (3 diffs)

trunk/frontends/gtk2-perl/memcachedclient

@@ -4 +4 @@
 use strict;
 use Gtk2;
-use MemCachedClient;
+use Gtk2::Gdk::Keysyms;
+use Cache::Memcached;
 use Data::Dumper;
 
@@ -12 +13 @@
 my $cmd_cur = -1;
 
-my $mc = new MemCachedClient {
+my $mc = new Cache::Memcached {
     'servers' => [ "127.0.0.1:11211" ]
 };
@@ -33 +34 @@
 $display->modify_font(Gtk2::Pango::FontDescription->from_string("monospace"));
 $buffer->create_tag("command", "foreground", "blue");
-$buffer->create_tag("data");
+$buffer->create_tag("data", "foreground", "black");
 $buffer->create_tag("error", "foreground", "red");