diff options
author | jmmv <jmmv@pkgsrc.org> | 2003-06-01 15:59:17 +0000 |
---|---|---|
committer | jmmv <jmmv@pkgsrc.org> | 2003-06-01 15:59:17 +0000 |
commit | 3c27b2e80203e1f2d046c27754bd043b74ecf606 (patch) | |
tree | 0ed295c0bf9a25ce106f29fd17d5c3389c996705 /comms/linuxsms/patches | |
parent | fb4527b57f34e6690a67619866353fcb8339544d (diff) | |
download | pkgsrc-3c27b2e80203e1f2d046c27754bd043b74ecf606.tar.gz |
Initial import of linuxsms, version 0.64:
Linuxsms is a Perl script to send short messages (SMS) to GSM phones.
Provided in pkgsrc-wip by Juan RP as version 0.63.
Diffstat (limited to 'comms/linuxsms/patches')
-rw-r--r-- | comms/linuxsms/patches/patch-aa | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/comms/linuxsms/patches/patch-aa b/comms/linuxsms/patches/patch-aa new file mode 100644 index 00000000000..c46edf9a92c --- /dev/null +++ b/comms/linuxsms/patches/patch-aa @@ -0,0 +1,15 @@ +$NetBSD: patch-aa,v 1.1.1.1 2003/06/01 15:59:18 jmmv Exp $ + +--- linuxsms.orig 2003-06-01 17:57:09.000000000 +0200 ++++ linuxsms +@@ -129,7 +129,9 @@ sub set_ansi() { + sub main_test() { + # test if exist home of script, else try to create + if (! opendir(DIR, $HOME)) { +- mkdir ($HOME, 0700) or die $c_red.$c_bold.$c_blink."error\!, can\'t create ".$HOME.$c_default."\n"; ++ $main::tmphome=$HOME; ++ $main::tmphome =~ s|/$||g; ++ mkdir ($main::tmphome, 0700) or die $c_red.$c_bold.$c_blink."error\!, can\'t create ".$HOME.$c_default."\n"; + print $c_yellow.$c_bold."Creating ".$HOME.$c_default."\n"; + } + closedir (DIR); |