From 70c27ca36f696b12012d7f47ac3071f747b95207 Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@operamail.com>
Date: Wed, 1 Aug 2012 03:33:30 +0200
Subject: some edits

---
 pq4ps.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'pq4ps.pl')

diff --git a/pq4ps.pl b/pq4ps.pl
index a10c998..2f45053 100755
--- a/pq4ps.pl
+++ b/pq4ps.pl
@@ -1,9 +1,9 @@
 #!/usr/bin/perl
 
-opendir(DIR, "/usr/share/ponysay/ponies/");
+opendir(DIR, $ARGV[0]."/share/ponysay/ponies/");
 @files = readdir(DIR); 
 
-opendir(DIR, "/usr/share/ponysay/quotes/");
+opendir(DIR, $ARGV[0]."/share/ponysay/quotes/");
 @quotes = readdir(DIR); 
 
 
-- 
cgit