*** empty log message ***

diff --git a/src/perl/selection b/src/perl/selection
index 755506f5b5ff89b3077f12c9de71bab7b2444451..e77a83af97957b92de83e5f4b8ee9c5c0e8db4e9 100644 (file)
--- a/src/perl/selection
+++ b/src/perl/selection
@@ -8,3 +8,8 @@ sub on_keyboard_command {
 
    ()
 }
+
+sub on_selection_event {
+   warn "hiya\n";#d#
+   ()
+}