6. Make the scripts look for user and node_default files if there isn't a

[spider.git] / perl / DXCommandmode.pm

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 96c135376495fbbb0747f64b7ee996ae4657bfdb..c2cab9f9bb619dc02ed6831ae9a1401b85f006af 100644 (file)
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -147,7 +147,7 @@ sub start
        }
 
        # run a script send the output to the punter
-       my $script = new Script(lc $call);
+       my $script = new Script(lc $call) || new Script('user_default');
        $script->run($self) if $script;
 }