From 9248259708bd6ade5e334a2cdfb29d2a20acb0dd Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Mon, 3 Oct 2022 17:15:36 +0200 Subject: ... --- overlays/urxvt/52-osc.pl | 41 ----------------------------------------- overlays/urxvt/default.nix | 21 --------------------- 2 files changed, 62 deletions(-) delete mode 100644 overlays/urxvt/52-osc.pl delete mode 100644 overlays/urxvt/default.nix (limited to 'overlays/urxvt') diff --git a/overlays/urxvt/52-osc.pl b/overlays/urxvt/52-osc.pl deleted file mode 100644 index 3292e8c4..00000000 --- a/overlays/urxvt/52-osc.pl +++ /dev/null @@ -1,41 +0,0 @@ -#! perl - -=head1 NAME - -52-osc - Implement OSC 32 ; Interact with X11 clipboard - -=head1 SYNOPSIS - - urxvt -pe 52-osc - -=head1 DESCRIPTION - -This extension implements OSC 52 for interacting with system clipboard - -Most code stolen from: -http://ailin.tucana.uberspace.de/static/nei/*/Code/urxvt/ - -=cut - -use MIME::Base64; -use Encode; - -sub on_osc_seq { - my ($term, $op, $args) = @_; - return () unless $op eq 52; - - my ($clip, $data) = split ';', $args, 2; - if ($data eq '?') { - # my $data_free = $term->selection(); - # Encode::_utf8_off($data_free); # XXX - # $term->tt_write("\e]52;$clip;".encode_base64($data_free, '')."\a"); - } - else { - my $data_decoded = decode_base64($data); - Encode::_utf8_on($data_decoded); # XXX - $term->selection($data_decoded, $clip =~ /c|^$/); - $term->selection_grab(urxvt::CurrentTime, $clip =~ /c|^$/); - } - - () -} diff --git a/overlays/urxvt/default.nix b/overlays/urxvt/default.nix deleted file mode 100644 index 77a2c51f..00000000 --- a/overlays/urxvt/default.nix +++ /dev/null @@ -1,21 +0,0 @@ -{ final, prev, ... }: { - rxvt_unicode-with-plugins = prev.rxvt-unicode.override { - configure = { availablePlugins, ... }: { - plugins = [ final.urxvt_osc_52 ] ++ builtins.attrValues availablePlugins; - }; - }; - urxvt_osc_52 = prev.stdenv.mkDerivation { - name = "rxvt_unicode-osc_52-0"; - src = ./52-osc.pl; - unpackPhase = '' - cp $src 52-osc - ''; - buildPhase = '' - sed -i 's|#! perl|#! ${final.perl}/bin/perl|g' 52-osc - ''; - installPhase = '' - mkdir -p $out/lib/urxvt/perl - cp 52-osc $out/lib/urxvt/perl - ''; - }; -} -- cgit v1.2.3