X-Git-Url: https://git.p6c8.net/devedit.git/blobdiff_plain/73f2498331782691215bb4cc02fc4431145b7027..28756a17617639eff8ce8d5014d3ec0acdd146d2:/modules/Tool.pm?ds=inline

diff --git a/modules/Tool.pm b/modules/Tool.pm
index 2d044e0..2b73423 100644
--- a/modules/Tool.pm
+++ b/modules/Tool.pm
@@ -35,7 +35,7 @@ use base qw(Exporter);
 
 # check_path()
 #
-# Check, if a virtual path is above a virtual root directory
+# Check if a virtual path is above a virtual root directory
 # (currently no check if the path exists - check otherwise!)
 #
 # Params: 1. Virtual root directory
@@ -69,7 +69,7 @@ sub check_path($$)
 
  # Check if the path is above the root directory
 
- return if(index($path,$root) == -1);
+ return if(index($path,$root) != 0);
  return if($first eq $root && $last =~ m!^(/|\\)?\.\.(/|\\)?$!);
 
  # Create short path name