[perl-Padre] Fake home directory to pass tests

[Petr Pisar]

commit 8af9391e6f0f6d8a7c4e57c2c4cc519d9b607fa5
Author: Petr Písař <ppisar at redhat.com>
Date:   Thu Jun 23 12:24:39 2011 +0200

    Fake home directory to pass tests

 perl-Padre.spec |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)
---
diff --git a/perl-Padre.spec b/perl-Padre.spec
index 3db8542..6de3107 100644
--- a/perl-Padre.spec
+++ b/perl-Padre.spec
@@ -340,6 +340,9 @@ desktop-file-install --vendor="fedora" \
 
 
 %check
+# Fake home directory because tests expect it and touch it
+export HOME="$PWD/testhome"
+mkdir "$HOME"
 %if %{use_x11_tests}
     xinit /bin/sh -c 'rm -f ok; make test && touch ok' -- /usr/bin/Xvfb :666
     test -e ok