From 660c7e66b3854dd2bffb6c4873183ad6fdac84ca Mon Sep 17 00:00:00 2001
From: root <root>
Date: Wed, 25 Jan 2006 01:53:33 +0000
Subject: [PATCH] *** empty log message ***

---
 src/perl/xim-onthespot | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/src/perl/xim-onthespot b/src/perl/xim-onthespot
index 08ffb437..4b610155 100644
--- a/src/perl/xim-onthespot
+++ b/src/perl/xim-onthespot
@@ -27,7 +27,7 @@ sub refresh {
 
       $rstyle |= urxvt::RS_Uline   if $_ & (urxvt::XIMUnderline | urxvt::XIMPrimary);
       $rstyle |= urxvt::RS_RVid    if $_ & (urxvt::XIMReverse   | urxvt::XIMSecondary);
-      $rstyle |= urxvt::RS_Blink   if $_ & (urxvt::XIMHighlight | urxvt::XIMTertiary);
+      $rstyle |= urxvt::RS_Italic  if $_ & (urxvt::XIMHighlight | urxvt::XIMTertiary);
 
       ($rstyle) x ($self->strwidth (substr $text, $idx++, 1))
    } unpack "l!*", $self->{rend};
@@ -57,12 +57,6 @@ sub on_xim_preedit_done {
    ()
 }
 
-sub on_xim_preedit_caret {
-   my ($self, $pos, $dir, $style) = @_;
-   warn "preedit_caret(@_)\n";
-   ()
-}
-
 sub on_xim_preedit_draw {
    my ($self, $caret, $pos, $len, $feedback, $chars) = @_;
 
-- 
2.34.1