Make tab-completion work for all cases
authorTilghman Lesher <tilghman@meg.abyt.es>
Mon, 14 Apr 2008 16:32:59 +0000 (16:32 +0000)
committerTilghman Lesher <tilghman@meg.abyt.es>
Mon, 14 Apr 2008 16:32:59 +0000 (16:32 +0000)
git-svn-id: https://origsvn.digium.com/svn/asterisk/trunk@114115 65c4cc65-6c06-0410-ace0-fbb531ad65f3

contrib/scripts/astcli

index d6feef0..723e1ba 100755 (executable)
@@ -152,10 +152,10 @@ sub tab_completion {
        if ($word eq '') {
                $buffer =~ m/(\S+)\s?$/;
                $lastword = $1;
-               print STDERR "\n\nlastword=\"$lastword\"\n";
+               #print STDERR "\n\nlastword=\"$lastword\"\n";
        }
 
-       my $res = send_command("_command matchesarray \"$buffer\" \"$word\"\n");
+       my $res = send_command("_command matchesarray \"$buffer\" \"$word\"");
        foreach my $item (split /\s+/, $res) {
                $items{$item}++ unless ($item eq '_EOF_' or $item eq '' or $item eq $lastword);
        }