aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xgit2cl10
1 files changed, 1 insertions, 9 deletions
diff --git a/git2cl b/git2cl
index dcea523..2fb3290 100755
--- a/git2cl
+++ b/git2cl
@@ -92,13 +92,6 @@ my %month = (
my $fh = new FileHandle;
-sub key_ready
-{
- my ($rin, $nfd);
- vec($rin, fileno(STDIN), 1) = 1;
- return $nfd = select($rin, undef, undef, 0);
-}
-
sub strptime {
my $str = shift;
return undef if not defined $str;
@@ -323,9 +316,8 @@ $state = 0;
# if reading from STDIN, we assume that we are
# getting git log as input
-if (key_ready())
+if (-f STDIN or -l STDIN or -p STDIN)
{
-
#my $dummyfh; # don't care about writing
#($fh,$dummyfh) = FileHandle::pipe;
$fh->fdopen(*STDIN, 'r');