/[wait]/trunk/script/sman
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/script/sman

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 104 by dpavlin, Tue Jun 29 22:21:50 2004 UTC revision 105 by dpavlin, Tue Jun 29 22:35:59 2004 UTC
# Line 82  print $OUT "Enter 'h' for help.\n"; Line 82  print $OUT "Enter 'h' for help.\n";
82  # them (a query), show metadata for a hit (a view), show a hot (display)  # them (a query), show metadata for a hit (a view), show a hot (display)
83    
84  my($query, @did);  my($query, @did);
85  my %hits;  my (%hits, $query_text);
86    
87  while (defined ($_ = &myreadline("$st> "))) {  while (defined ($_ = &myreadline("$st> "))) {
88    chomp; $st++;    chomp; $st++;
89    
   my $query_text;  
90    if (/^$/) {    if (/^$/) {
91      next;      next;
92    } elsif (/^m (\d+)$/) {    } elsif (/^m (\d+)$/) {

Legend:
Removed from v.104  
changed lines
  Added in v.105

  ViewVC Help
Powered by ViewVC 1.1.26