*** dict.sh.orig	Tue May  5 10:15:51 1998
--- dict.sh	Tue May  5 10:26:14 1998
***************
*** 22,32 ****
      PAGER=cat
  fi
  
! if $agrep $agrep_opt - $1 $dict; then 
      :
  else
      echo "Nothing found, try best match mode" >&2
!     $agrep $agrep_opt -B - $1 $dict
  fi | perl -ne '($en, $de) = split(/\s*::\s*/);
  	  print sprintf("%-35s %s", $en, $de);' | $PAGER
  
--- 22,32 ----
      PAGER=cat
  fi
  
! if $agrep $agrep_opt -e $1 $dict; then 
      :
  else
      echo "Nothing found, try best match mode" >&2
!     $agrep $agrep_opt -B -e $1 $dict
  fi | perl -ne '($en, $de) = split(/\s*::\s*/);
  	  print sprintf("%-35s %s", $en, $de);' | $PAGER
  
