X-Git-Url: http://git.iain.cx/?p=profile.git;a=blobdiff_plain;f=has_term;fp=has_term;h=0000000000000000000000000000000000000000;hp=52005c1bb31bc3431cb5d552f10a3010cb6decc2;hb=819bb88d5a014a23150b8fd609d194e883958674;hpb=596624f4629703d95ef6c0d10efba2d2c36cb7c5

diff --git a/has_term b/has_term
deleted file mode 100755
index 52005c1..0000000
--- a/has_term
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/perl
-#
-# has_term: Check for a valid TERM value.
-# Usage: has_term [<term>]
-# Exits: 0 if the TERM setting is valid.
-#        1 otherwise.
-# Example: has_term dtterm
-#
-
-use Term::Cap;
-
-# Quit.
-close STDERR;
-
-# Don't be fooled by screen.
-delete $ENV{TERMCAP};
-Tgetent Term::Cap { TERM => $ARGV[0], OSPEED => 9600 } and exit 0;
-exit 100;