#!/bin/csh -f
#
#	Convert meta-characters copy/pasted from web pages to HTML &; sequences.
#	These match what comes from Firefox; Lynx has some differences.
#	Brent Chivers		2010/Apr/10
#
#	Do "&" first; otherwise it corrupts anything preceeding it.
#
#	Undo change "&" to "&" if it was part of another &; sequence.
#
#	Linux: /bin/sed, not /usr/bin/sed.			2011/Jan/08

##! /bin/csh -fb	# for setuid/setgid scripts (tsk)
# set verbose		# see commands before variable substitution
# set echo		# see commands after variable substitution
unset histchars		# get other users' history characters out of the way
unalias *		# get other users' .cshrc stuff out of the way
## set nonomatch	# don't require wildcard matches
# this was before \&le ; I can't see what it's meant to do; yanked 2011/05/17
# -e 's/�/\≠/g'	\
 
/bin/sed		\
-e 's/&/\&/g'	\
-e 's/&\([A-Za-z][a-z]*;\)/\&\1/g'	\
-e 's/&\(#[0-9][0-9]*;\)/\&\1/g'	\
-e 's/"/\"/g'	\
-e 's/</\&lt;/g'	\
-e 's/>/\&gt;/g'	\
-e 's/�/\&iexcl;/g'	\
-e 's/�/\&cent;/g'	\
-e 's/�/\&pound;/g'	\
-e 's/�/\&yen;/g'	\
-e 's/�/\&sect;/g'	\
-e 's/�/\&uml;/g'	\
-e 's/�/\&copy;/g'	\
-e 's/�/\&ordf;/g'	\
-e 's/�/\&reg;/g'	\
-e 's/�/\&trade;/g'	\
-e 's/�/\&deg;/g'	\
-e 's/�/\&plusmn;/g'	\
-e 's/�/\&acute;/g'	\
-e 's/�/\&micro;/g'	\
-e 's/�/\&para;/g'	\
-e 's/�/\&ordm;/g'	\
-e 's/�/\&iquest;/g'	\
-e 's/�/\&Auml;/g'	\
-e 's/�/\&Aring;/g'	\
-e 's/�/\&AElig;/g'	\
-e 's/�/\&Ccedil;/g'	\
-e 's/�/\&Eacute;/g'	\
-e 's/�/\&Ntilde;/g'	\
-e 's/�/\&Ouml;/g'	\
-e 's/�/\&Oslash;/g'	\
-e 's/�/\&Uuml;/g'	\
-e 's/�/\&szlig;/g'	\
-e 's/�/\&aacute;/g'	\
-e 's/�/\&agrave;/g'	\
-e 's/�/\&acirc;/g'	\
-e 's/�/\&auml;/g'	\
-e 's/�/\&atilde;/g'	\
-e 's/�/\&aring;/g'	\
-e 's/�/\&aelig;/g'	\
-e 's/�/\&ccedil;/g'	\
-e 's/�/\&eacute;/g'	\
-e 's/�/\&egrave;/g'	\
-e 's/�/\&ecirc;/g'	\
-e 's/�/\&euml;/g'	\
-e 's/�/\&iacute;/g'	\
-e 's/\�/\&iacute;/g'	\
-e 's/�/\&igrave;/g'	\
-e 's/�/\&icirc;/g'	\
-e 's/�/\&iuml;/g'	\
-e 's/�/\&ntilde;/g'	\
-e 's/�/\&oacute;/g'	\
-e 's/�/\&ograve;/g'	\
-e 's/�/\&ocirc;/g'	\
-e 's/�/\&ouml;/g'	\
-e 's/�/\&otilde;/g'	\
-e 's/�/\&oslash;/g'	\
-e 's/�/\&uacute;/g'	\
-e 's/�/\&ugrave;/g'	\
-e 's/\�\�/\&uacute;/g'	\
-e 's/�/\&ucirc;/g'	\
-e 's/�/\&uuml;/g'	\
-e 's/�/\&dagger;/g'	\
-e 's/�/\&bull;/g'	\
-e 's/�/\&part;/g'	\
-e 's/�/\&prod;/g'	\
-e 's/�/\&sum;/g'	\
-e 's/�/\&infin;/g'	\
-e 's/�/\&int;/g'	\
-e 's/�/\&le;/g'	\
-e 's/�/\&ge;/g'	\
-e 's/�/\&Omega;/g'	\
-e 's/�/\&#8486;/g'	\
-e 's/�/\&pi;/g'	\
-e 's/�/\&Agrave;/g'	\
-e 's/�/\&Aacute;/g'	\
-e 's/\�/\&Acirc;/g'	\
-e 's/\�/\&Atilde;/g'	\
-e 's/\�/\&Auml;/g'	\
-e 's/\�/\&Aring;/g'	\
-e 's/\�/\&AElig;/g'	\
-e 's/\�/\&Ccedil;/g'	\
-e 's/\�/\&Egrave;/g'	\
-e 's/\�/\&Eacute;/g'	\
-e 's/\�/\&Ecirc;/g'	\
-e 's/\�/\&Euml;/g'	\
-e 's/\�/\&Igrave;/g'	\
-e 's/\�/\&Iacute;/g'	\
-e 's/\�/\&Icirc;/g'	\
-e 's/\�/\&Iuml;/g'	\
-e 's/\�/\&ETH;/g'	\
-e 's/\�/\&Ntilde;/g'	\
-e 's/\�/\&Ograve;/g'	\
-e 's/\�/\&Oacute;/g'	\
-e 's/\�/\&Ocirc;/g'	\
-e 's/\�/\&Otilde;/g'	\
-e 's/\�/\&Ouml;/g'	\
-e 's/\�/\&Oslash;/g'	\
-e 's/\�/\&Ugrave;/g'	\
-e 's/\�/\&Uacute;/g'	\
-e 's/\�/\&Ucirc;/g'	\
-e 's/\�/\&Uuml;/g'	\
-e 's/\�/\&Yacute;/g'	\
-e 's/\�/\&THORN;/g'	\
-e 's/\�/\&szlig;/g'	\
-e 's/\�/\&agrave;/g'	\
-e 's/\�/\&aacute;/g'	\
-e 's/\�/\&acirc;/g'	\
-e 's/\�/\&atilde;/g'	\
-e 's/\�/\&auml;/g'	\
-e 's/\�/\&aring;/g'	\
-e 's/\�/\&aelig;/g'	\
-e 's/\�/\&ccedil;/g'	\
-e 's/\�/\&egrave;/g'	\
-e 's/\�/\&eacute;/g'	\
-e 's/\�/\&ecirc;/g'	\
-e 's/\�/\&euml;/g'	\
-e 's/\�/\&igrave;/g'	\
-e 's/\�/\&iacute;/g'	\
-e 's/\�/\&icirc;/g'	\
-e 's/\�/\&iuml;/g'	\
-e 's/\�/\&eth;/g'	\
-e 's/\�/\&ntilde;/g'	\
-e 's/\�/\&ograve;/g'	\
-e 's/\�/\&oacute;/g'	\
-e 's/\�/\&ocirc;/g'	\
-e 's/\�/\&otilde;/g'	\
-e 's/\�/\&ouml;/g'	\
-e 's/\�/\&oslash;/g'	\
-e 's/\�/\&ugrave;/g'	\
-e 's/\�/\&uacute;/g'	\
-e 's/\�/\&ucirc;/g'	\
-e 's/\�/\&uuml;/g'	\
-e 's/\�/\&yacute;/g'	\
-e 's/\�/\&thorn;/g'	\
-e 's/\�/\&yuml;/g'