From f6aabd9108a7e329e3ee4898c965d36118e09223 Mon Sep 17 00:00:00 2001 From: root Date: Wed, 18 Jan 2006 17:58:36 +0000 Subject: [PATCH] *** empty log message *** --- Changes | 2 +- MANIFEST | 1 + src/perl/automove-background | 7 +++++++ 3 files changed, 9 insertions(+), 1 deletion(-) create mode 100644 src/perl/automove-background diff --git a/Changes b/Changes index e1a804bc..4412e1cc 100644 --- a/Changes +++ b/Changes @@ -32,7 +32,6 @@ TODO: distributed clipboard example span the whole screen, as long as it starts at row 0. Helps for programs displaying a status line at the bottom. - selection popup now shows selection in dec/hex/oct. - - some fixes to xpm offste and scaling code. - perl/selection: matching on unicode characters in the selection code was O(n²), which equals infinity in some degenerate cases :-> Matching is now done on UTF-8, which makes it almost instant. @@ -50,6 +49,7 @@ TODO: distributed clipboard example anymore. - removed all traces of SMOOTH_REFRESH. - nuked QNX support. + - made some fixes to xpm offset and scaling code. - perl-overlays and refresh hooks were not applied in correct order. - changed coordinate-system of view_start/nsaved to be top to bottom. diff --git a/MANIFEST b/MANIFEST index be7f266d..e51980ef 100644 --- a/MANIFEST +++ b/MANIFEST @@ -167,6 +167,7 @@ src/perl/selection-popup src/perl/selection-autotransform src/perl/selection-pastebin src/perl/searchable-scrollback +src/perl/automove-background src/perl/mark-urls src/perl/example-refresh-hooks src/perl/block-graphics-to-ascii diff --git a/src/perl/automove-background b/src/perl/automove-background new file mode 100644 index 00000000..6426c4ec --- /dev/null +++ b/src/perl/automove-background @@ -0,0 +1,7 @@ +#! perl + +sub on_configure_notify { + my ($self, $event) = @_; + + $self->cmd_parse ("\033]20;;=+$event->{x}+$event->{y}\007"); +} -- 2.34.1