dave
/
docker-buttbot
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

using realbin over bin

This commit is contained in:
long.haired.steve 2009-11-10 15:20:50 +00:00
parent 84fb5ace8a
commit 09845662d5
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Butts.pm
View File

@ -6,7 +6,7 @@ use warnings;
use Math::Random; use Math::Random;
use TeX::Hyphen; use TeX::Hyphen;
use Data::Dumper; use Data::Dumper;
use FindBin qw($Bin); use FindBin qw($RealBin);
use Carp; use Carp;
use fields qw/replace_freq use fields qw/replace_freq
@ -26,8 +26,8 @@ sub new {
} }
my %args = (hyphen_file => "$Bin/hyphen.tex", my %args = (hyphen_file => "$RealBin/hyphen.tex",
stopwords_file => "$Bin/stopwords", stopwords_file => "$RealBin/stopwords",
debug => 0, debug => 0,
meme => 'butt', meme => 'butt',
replace_freq => (1/11), # original value from tef. replace_freq => (1/11), # original value from tef.

4
butt
View File

@ -3,8 +3,8 @@ use strict;
use warnings; use warnings;
BEGIN { BEGIN {
use FindBin qw($Bin); use FindBin qw($RealBin);
push @INC, $Bin; push @INC, $RealBin;
} }
use Butts; use Butts;