From c374d57fd365833807c2e191178848d76828e859 Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@operamail.com>
Date: Tue, 24 Jul 2012 16:16:59 +0200
Subject: /tmp/ponythink instead of /tmp/.ponythink

---
 ponysay        | 6 +++---
 ponysaylist.pl | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/ponysay b/ponysay
index 76bc94f..0fdcb18 100755
--- a/ponysay
+++ b/ponysay
@@ -173,9 +173,9 @@ say() {
 			ccmd=$(for c in $(echo $PATH":" | sed -e 's/:/\/'"$cmd"' /g'); do if [[ -f $c ]]; then echo $c; break; fi done)
 			
 			if [[ ${0} == *ponythink ]]; then
-				cat <(echo -e $pcmd) $ccmd > "/tmp/.ponythink"
-				perl '/tmp/.ponythink' "$@"
-				rm '/tmp/.ponythink'
+				cat <(echo -e $pcmd) $ccmd > "/tmp/ponythink"
+				perl '/tmp/ponythink' "$@"
+				rm '/tmp/ponythink'
 			else
 				perl <(cat <(echo -e $pcmd) $ccmd) "$@"
 			fi
diff --git a/ponysaylist.pl b/ponysaylist.pl
index 72c0a92..401d83b 100755
--- a/ponysaylist.pl
+++ b/ponysaylist.pl
@@ -17,7 +17,7 @@ foreach $arg (@ARGV)
 {
 	# Format names from ponyies names
 	$arg =~ s/([a-z])([A-Z])/\1 \2/;
-	$arg =~ s/_(.*)/\t(\1)/;
+	#$arg =~ s/_(.*)/\t(\1)/;   ## Incompatible with `ponysay -L`
 	
     if ($first == 1)
     {   $first = 0;
-- 
cgit