--- rxvt-unicode/src/rxvtperl.xs	2014/05/17 15:25:04	1.222
+++ rxvt-unicode/src/rxvtperl.xs	2014/09/03 18:20:37	1.226
@@ -3,11 +3,11 @@
  *----------------------------------------------------------------------*
  *
  * All portions of code are copyright by their respective author/s.
- * Copyright (c) 2005-2008,2011 Marc Lehmann <schmorp@schmorp.de>
+ * Copyright (c) 2005-2014,2011 Marc Lehmann <schmorp@schmorp.de>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation; either version 3 of the License, or
  * (at your option) any later version.
  *
  * This program is distributed in the hope that it will be useful,
@@ -495,6 +495,20 @@
 }
 
 static void
+_keysym_resource_push (rxvt_term *term, const char *k, const char *v)
+{
+  dSP;
+  XPUSHs (sv_2mortal (newSVpv (v, 0)));
+  PUTBACK;
+}
+
+static void
+_keysym_resources (rxvt_term *term)
+{
+  term->enumerate_keysym_resources (_keysym_resource_push);
+}
+
+static void
 ungrab (rxvt_term *THIS)
 {
   if (THIS->perl.grabtime)
@@ -1195,6 +1209,13 @@
 	CODE:
         XrmPutStringResource (&THIS->option_db, specifier, value);
 
+void
+rxvt_term::_keysym_resources ()
+	PPCODE:
+        PUTBACK;
+        _keysym_resources (THIS);
+        SPAGAIN;
+
 int
 rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt)
 	CODE:
@@ -1818,6 +1839,7 @@
 #endif
 
                   case Opt_cursorUnderline:
+                    THIS->cursor_type = set ? 1 : 0;
                     THIS->want_refresh = 1;
                     THIS->refresh_check ();
                     break;
@@ -1843,13 +1865,6 @@
         RETVAL
 
 void
-rxvt_term::register_command (int keysym, unsigned int state, SV *str)
-        CODE:
-        wchar_t *wstr = sv2wcs (str);
-        THIS->keyboard->register_action (keysym, state, wstr);
-        free (wstr);
-
-void
 rxvt_term::screen_cur (...)
 	PROTOTYPE: $;$$
         ALIAS: