1
0
mirror of https://github.com/balkian/dotfiles.git synced 2024-11-14 00:32:28 +00:00
dotfiles/not_dots/clipboard
J. Fernando Sánchez 7bbcb17419 Several improvements.
* Tmux is not started by default anymore
* Added functions for i3 - Awesome!!
* zsh to start tmux
2013-07-12 19:19:52 +02:00

10 lines
239 B
Perl

#! /usr/bin/perl
# /usr/lib/urxvt/perl/clipboard
sub on_sel_grab {
my $query=quotemeta $_[0]->selection;
$query=~ s/\n/\\n/g;
$query=~ s/\r/\\r/g;
system( "echo " . $query . " | xsel -i -b -p" );
}