Changeset 888

Timestamp:

Jun 26, 2010, 12:16:44 AM (14 years ago)

Author:

joergs

Message:

cleanup

File:

• dasscm/trunk/usr/bin/dasscm (modified) (4 diffs)

dasscm/trunk/usr/bin/dasscm

@@ -955 +955 @@
 }
 
+
+#
+# use globbing to get lsit of files
+# that matches the given prefix
+# used for bash completion
+#
+sub get_complete_path_globbing( $ )
+{
+    my $path = shift;
+
+    # add globbing
+    $path .= "*";
+
+    # get files
+    my @files = glob( $path );
+
+    # if only one result is available
+    # and this result is a directory,
+    # add another result entry
+    # (otherwise complete will stop here and continue with the next parameter)
+    if( $#files == 0 ) {
+        my $path = $files[0];
+        if( -d $path ) {
+            push( @files, $path . "/" );
+        }
+    }
+
+    return @files;
+}
+
+
 #####################################################################
 #
@@ -1560 +1591 @@
 
 
-
 sub complete_path(@)
 {
@@ -1574 +1604 @@
     ) = get_filenames( $_[0] );
 
-    my $path = $filename_prod . "*";
-
-    my @files = glob( $path );
-
-    # if only one result is available
-    # and this result is a directory,
-    # add another result entry
-    # (otherwise complete will stop here and continue with the next parameter)
-    if( $#files == 0 ) {
-        my $path = $files[0];
-        if( -d $path ) {
-            push( @files, $path . "/" );
-        }
-    }
+    my @files = get_complete_path_globbing( $filename_prod );
 
     if (@files) {
@@ -1610 +1627 @@
     ) = get_filenames( $_[0] );
 
-    my $path = $filename_repo . "*";
-
-    my @files = glob( $path );
-
-    # if only one result is available
-    # and this result is a directory,
-    # add another result entry
-    # (otherwise complete will stop here and continue with the next parameter)
-    if( $#files == 0 ) {
-        my $path = $files[0];
-        if( -d $path ) {
-            push( @files, $path . "/" );
-        }
-    }
+    my @files = get_complete_path_globbing( $filename_repo );
     
     if (@files) {