metamail-fixpartial.patch

   1 --- mm2.7/src/bin/showpartial.fixpartial        Thu Feb  1 12:20:37 2001
   2 +++ mm2.7/src/bin/showpartial   Thu Feb  1 12:21:29 2001
   3 @@ -13,7 +13,7 @@
   4  endif
   5  set file="$1"
   6  # This next line is because message-id can contain weird chars
   7 -set id=`echo $2 | tr -d  \!\$\&\*\(\)\|\'\"\;\/\<\>\\`
   8 +set id=`echo $2 | tr -d  \!\$\&\*\(\)\|\'\"\;\/\<\>\\\\`
   9  @ partnum = "$3"
  10  if ($#argv == 3 || "$4" == "") then
  11      set totalnum=-1
  12 @@ -74,9 +74,9 @@
  13  end
  14  if ("$found" == "$totalnum") then
  15      cd "${TREEROOT}/$id"
  16 -    cat "$list" > "${TREEROOT}/$id/FULL"
  17 +    cat $list > "${TREEROOT}/$id/FULL"
  18  #    cat ${TREEROOT}/$id/HDRS $list > ${TREEROOT}/$id/FULL
  19 -    rm "$list"
  20 +    rm $list
  21      echo All parts of this "${totalnum}"-part message have now been read.
  22      metamail -d "${TREEROOT}/$id/FULL"
  23      echo WARNING:  To save space, the full file is now being deleted.