not using xmonad any more, so don't really care about this

4 files changed, 0 insertions, 81 deletions

diff --git a/bin/exec-path-next b/bin/exec-path-next
deleted file mode 100755
index 02f556b..0000000
--- a/bin/exec-path-next
+++ /dev/null
@@ -1,35 +0,0 @@
-#!/usr/bin/perl
-use warnings;
-use strict;
-use FindBin;
-use Cwd 'realpath';
-use File::Basename;
-use File::Spec;
-
-=pod
-
-apparently some things look for their binaries in relative paths to other
-binaries... this is pretty dumb, fix that
-
-=cut
-
-sub firstval (&@) {
-    my $code = shift;
-    for (@_) {
-        return $_ if $code->();
-    }
-    return;
-}
-
-my $bin = realpath $FindBin::Bin;
-my $executable = fileparse($0);
-
-my $exepath = (
-    firstval { -f $_ }
-    map { File::Spec->catfile($_, $executable) }
-    grep { defined $_ && $_ ne $bin }
-    map { realpath $_ }
-    split( /:/, $ENV{PATH} )
-);
-
-exec($exepath, @ARGV);
diff --git a/bin/ghc/ghc b/bin/ghc/ghc
deleted file mode 100755
index ab3cc56..0000000
--- a/bin/ghc/ghc
+++ /dev/null
@@ -1,44 +0,0 @@
-#!/usr/bin/perl
-use warnings;
-use strict;
-use FindBin;
-use Cwd 'realpath';
-use File::Basename;
-use File::Spec;
-
-=pod
-
-ghc does something dumb with timers for their concurrency stuff that causes a
-huge amount of wakeups, disable that
-
-=cut
-
-sub any (&@) {
-    my $code = shift;
-    !!grep { $code->() } @_;
-}
-
-sub firstval (&@) {
-    my $code = shift;
-    for (@_) {
-        return $_ if $code->();
-    }
-    return;
-}
-
-my $bin = realpath $FindBin::Bin;
-my $executable = fileparse($0);
-
-if (any { /xmonad/ } @ARGV) {
-    unshift @ARGV, '-with-rtsopts=-V0';
-}
-
-my $exepath = (
-    firstval { -f $_ }
-    map { File::Spec->catfile($_, $executable) }
-    grep { defined $_ && $_ ne $bin }
-    map { realpath $_ }
-    split( /:/, $ENV{PATH} )
-);
-
-exec($exepath, @ARGV);
diff --git a/bin/ghc/ghc-pkg b/bin/ghc/ghc-pkg
deleted file mode 120000
index f1abad2..0000000
--- a/bin/ghc/ghc-pkg
+++ /dev/null
@@ -1 +0,0 @@
-../exec-path-next
\ No newline at end of file
diff --git a/bin/ghc/hsc2hs b/bin/ghc/hsc2hs
deleted file mode 120000
index f1abad2..0000000
--- a/bin/ghc/hsc2hs
+++ /dev/null
@@ -1 +0,0 @@
-../exec-path-next
\ No newline at end of file