From 9e32e3aaef465a532c7c5432c0176fef6f415f25 Mon Sep 17 00:00:00 2001 From: Ryan Kavanagh Date: Mon, 13 Dec 2021 17:10:42 -0500 Subject: urxvt cleanup --- .urxvt/blc | 36 ------------------------------------ 1 file changed, 36 deletions(-) delete mode 100644 .urxvt/blc (limited to '.urxvt/blc') diff --git a/.urxvt/blc b/.urxvt/blc deleted file mode 100644 index 6833ca2..0000000 --- a/.urxvt/blc +++ /dev/null @@ -1,36 +0,0 @@ -#! perl - -# Optional Bell Command for http://bugs.debian.org/633989 -# Copyright (C) 2011 Ryan Kavanagh -# -# Permission to use, copy, modify, and/or distribute this software for -# any purpose with or without fee is hereby granted, provided that the -# above copyright notice and this permission notice appear in all -# copies. -# -# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL -# WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED -# WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE -# AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL -# DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR -# PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER -# TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR -# PERFORMANCE OF THIS SOFTWARE. - -sub on_start { - my ($self) = @_; - - $self->{command} = $self->x_resource("bellCommand") || - "false"; - - () -} - -sub on_bell { - my ($self) = @_; - - my @exec = $self->exec_async($self->{command}); - - () -} -# vim:set sw=3 sts=3 et: -- cgit v1.2.3