[Catalyst-commits] r7837 - trunk/Catalyst-View-Mason/lib/Catalyst/View

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2008-05-28 14:47:19 +0100 (Wed, 28 May 2008)
New Revision: 7837

Modified:
   trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm
Log:
Build the data_dir default from the application name and the user id.


Modified: trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm
===================================================================
--- trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm	2008-05-28 13:47:07 UTC (rev 7836)
+++ trunk/Catalyst-View-Mason/lib/Catalyst/View/Mason.pm	2008-05-28 13:47:19 UTC (rev 7837)
@@ -74,7 +74,10 @@
 
     my %config = (
         comp_root                        => $c->config->{root},
-        data_dir                         => File::Spec->tmpdir,
+        data_dir                         => File::Spec->catdir(
+            File::Spec->tmpdir,
+            sprintf('%s_%d_mason_data_dir', $c, $<),
+        ),
         use_match                        => 1,
         allow_globals                    => [],
         template_extension               => q//,