r23441@martha (orig r923): groditi | 2008-10-23 22:00:04 -0400

[catagits/Reaction.git] / lib / Reaction / UI / Skin.pm

diff --git a/lib/Reaction/UI/Skin.pm b/lib/Reaction/UI/Skin.pm
index e5233cf..261af79 100644 (file)
--- a/lib/Reaction/UI/Skin.pm
+++ b/lib/Reaction/UI/Skin.pm
@@ -92,10 +92,15 @@ sub _load_skin_config {
   }
   if (exists $cfg{widget_search_path}) {
     $self->widget_search_path($lst->($cfg{widget_search_path}));
-  } else {
+  }
+  # For some reason this conditional doesn't work correctly without
+  # the "my @x". Answers on a postcard.
+  unless (my @x = $self->full_widget_search_path) {
     confess "No widget_search_path in defaults.conf or skin.conf"
-            ." and no search path provided from super skin"
-      unless $self->full_widget_search_path;
+            .($self->has_super
+              ? " and no search path provided from super skin "
+                .$self->super->name
+              : "");
   }
 }
 sub create_layout_set {