&top_dir: +# FIXME: $in may not be defined here!

diff --git a/Web.pm b/Web.pm
index 5c7348e..d349658 100644 (file)
--- a/Web.pm
+++ b/Web.pm
@@ -183,6 +183,8 @@ my($in)=@_;
 
        if (my $uri=$ENV{"REQUEST_URI"}) {
                if ($W->{"args"}{"Wabs"}) {
+                       # FIXME: $in may not be defined here!
+                       # to prevent: Use of uninitialized value in ...
                        if ($in=~m#^/#) {
                                $in=~s#^/*##;
                                }