From: root <root>
Date: Sat, 21 Jan 2006 08:07:38 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=46935d5b6937eb42ac7b457f20e8a7382ac91230;p=dana%2Furxvt.git

*** empty log message ***
---

diff --git a/Changes b/Changes
index e07baeb3..03306d35 100644
--- a/Changes
+++ b/Changes
@@ -11,20 +11,22 @@ TODO: read property sequence is broken with respect to utf-8 etc.
 TODO: http://www120.pair.com/mccarthy/nextstep/intro.htmld/Workspace.html is the correct nextstep look.
 TODO: rxvt -name urxvt-girly /// leave pixel droppings
 TODO: distributed clipboard example
+TODO: http://www.issociate.de/board/post/274416/HOWTO:_Mouse_editing_with_readline_in_xterm.html
+TODO: http://groups.google.com/group/comp.unix.shell/msg/e538d04a118174d3
 WISH: perl extension for background image loading and moving the origin.
 WISH: OnTheSpot editing, or maybe switch to miiiiiiif. or maybe use perl and an overlay...
 WISH: just for fun, do shade and tint with XRender.
 WISH: support tex fonts
 
 7.2
-	- now it is possible to insert the value of the CLIPBOARD selection
-	  with shift - mouse button 2
-	- removed support for obsolete offix dnd protocol.
         - added "tabbed" extension that provides a crude tabbed terminal.
         - added "readline" extension that allows cursor positioning
           via mouse clicks.
+	- now it is possible to insert the value of the CLIPBOARD selection
+	  with shift - mouse button 2
         - fixed the automove-background extension to ignore coordinates
           in non-synthetic events.
+	- removed support for obsolete offix dnd protocol.
 
 7.1  Thu Jan 19 20:25:34 CET 2006
         - setuid/setgid operation is now _encouraged_: security has been
diff --git a/src/perl/readline b/src/perl/readline
index b11ada88..b73aef3a 100644
--- a/src/perl/readline
+++ b/src/perl/readline
@@ -3,12 +3,15 @@
 sub on_button_press {
    my ($self, $event) = @_;
 
+   return
+      if $self->current_screen || $self->hidden_cursor;
+
    my ($row, $col) = $self->screen_cur;
    my $line = $self->line ($row);
    my $cur = $line->offset_of ($row, $col);
    my $ofs = $line->offset_of ($event->{row}, $event->{col});
 
-   if ($ofs >= 0 && $ofs < $line->l && !$self->current_screen) {
+   if ($ofs >= 0 && $ofs < $line->l) {
       my $diff = $ofs - $cur;
       my $move;
 
diff --git a/src/rxvtperl.xs b/src/rxvtperl.xs
index af04e42a..64ffdb82 100644
--- a/src/rxvtperl.xs
+++ b/src/rxvtperl.xs
@@ -1120,13 +1120,15 @@ rxvt_term::ModLevel3Mask ()
            ModMetaMask    = 1
            ModNumLockMask = 2
            current_screen = 3
+           hidden_cursor  = 4
 	CODE:
         switch (ix)
           {
-           case 0: RETVAL = THIS->ModLevel3Mask;  break;
-           case 1: RETVAL = THIS->ModMetaMask;    break;
-           case 2: RETVAL = THIS->ModNumLockMask; break;
-           case 3: RETVAL = THIS->current_screen; break;
+            case 0: RETVAL = THIS->ModLevel3Mask;  break;
+            case 1: RETVAL = THIS->ModMetaMask;    break;
+            case 2: RETVAL = THIS->ModNumLockMask; break;
+            case 3: RETVAL = THIS->current_screen; break;
+            case 4: RETVAL = THIS->hidden_cursor;  break;
           }
         OUTPUT:
         RETVAL
diff --git a/src/urxvt.pm b/src/urxvt.pm
index 1552dc16..500ab70c 100644
--- a/src/urxvt.pm
+++ b/src/urxvt.pm
@@ -172,11 +172,20 @@ move the text cursor to this position. It does so by generating as many
 cursor-left or cursor-right keypresses as required (the this only works
 for programs that correctly support wide characters).
 
-It only works when clicking into the same line (possibly extended over
-multiple rows) as the text cursor and on the primary screen, to reduce the
-risk of misinterpreting. The normal selection isn't disabled, so quick
-successive clicks might interfere with selection creation in harmless
-ways.
+To avoid too many false positives, this is only done when:
+
+=over 4
+
+=item - the mouse is on the same (multi-row-) line as the text cursor.
+
+=item - the primary screen is currently being displayed.
+
+=item - the text cursor is visible.
+
+=back
+
+The normal selection mechanism isn't disabled, so quick successive clicks
+might interfere with selection creation in harmless ways.
 
 =item tabbed
 
@@ -1378,6 +1387,10 @@ AltGr), the meta key (often Alt) and the num lock key, if applicable.
 
 Returns the currently displayed screen (0 primary, 1 secondary).
 
+=item $cursor_is_hidden = $term->hidden_cursor
+
+Returns wether the cursor is currently hidden or not.
+
 =item $view_start = $term->view_start ([$newvalue])
 
 Returns the row number of the topmost displayed line. Maximum value is