#! /bin/csh -f
# Last modified on Tue Mar  3 21:58:05 1987 by stolfi
#---------------------------------------------------------------------
# Usage: move-news-folder <news-folder> <mail-folder>
# Moves the messages from folder $1 (in News
# format) to folder $2 (in mhe format), and renumbers them
# starting with the highest used number in folder $2 plus one.
# By definition, a message is a file whose last name is a number.
# Also filters each message through trim-headers.
#---------------------------------------------------------------------
if ($#argv != 2) then
  echo 'Usage: move-news-folder <news-folder> <mail-folder>
  exit(1)
endif
set from = $1
if (! -d $from) then
  echo $from is not a directory
  exit(1)
endif
set to = $2
if (! -d $to) then
  echo $to is not a directory
  exit(1)
endif
set files = (`list-folder $from`)
if ($#files == 0) then
  echo "Can\'t find any messages in $from."
  exit(1)
endif
move-news-messages $files $to