Russ,

  Here is a patch to Pod::Text (from perl v5.5.670) that adds the missing
HTML escapes that can be displayed on an xterm. This includes
support for E<copy> and E<plusmn> that I tend to miss a lot. Not sure how
to supply the equivalent for Pod::Man.

Hope I have the patch the correct way round (first patch on p5p) and that
it can squeeze into the final 5.6 release [a very simple patch]:

-- 
Tim Jenness
JCMT software engineer/Support scientist
http://www.jach.hawaii.edu/~timj

*** lib/Pod/Text.pm.old Mon Mar  6 21:57:38 2000
--- lib/Pod/Text.pm     Mon Mar  6 21:58:08 2000
***************
*** 43,48 ****
--- 43,49 ----
  # This table is taken near verbatim from Pod::PlainText in Pod::Parser,
  # which got it near verbatim from the original Pod::Text.  It is therefore
  # credited to Tom Christiansen, and I'm glad I didn't have to write it.  :)
+ # "iexcl" to "divide" added by Tim Jenness
  %ESCAPES = (
      'amp'       =>    '&',      # ampersand
      'lt'        =>    '<',      # left chevron, less-than
***************
*** 112,119 ****
      "yacute"    =>    "\xFD",   # small y, acute accent
      "yuml"      =>    "\xFF",   # small y, dieresis or umlaut mark
                                    
!     "lchevron"  =>    "\xAB",   # left chevron (double less than)
!     "rchevron"  =>    "\xBB",   # right chevron (double greater than)
  );
  
  
--- 113,154 ----
      "yacute"    =>    "\xFD",   # small y, acute accent
      "yuml"      =>    "\xFF",   # small y, dieresis or umlaut mark
                                    
!     "lchevron"  =>    "\xAB",   # left chevron (double less than) laquo
!     "rchevron"  =>    "\xBB",   # right chevron (double greater than) raquo
! 
!     "iexcl"  =>   "\xA1",   # inverted exclamation mark
!     "cent"   =>   "\xA2",   # cent sign
!     "pound"  =>   "\xA3",   # (UK) pound sign
!     "curren" =>   "\xA4",   # currency sign
!     "yen"    =>   "\xA5",   # yen sign
!     "brvbar" =>   "\xA6",   # broken vertical bar
!     "sect"   =>   "\xA7",   # section sign
!     "uml"    =>   "\xA8",   # diaresis
!     "copy"   =>   "\xA9",   # Copyright symbol
!     "ordf"   =>   "\xAA",   # feminine ordinal indicator
!     "laquo"  =>   "\xAB",   # left pointing double angle quotation mark
!     "not"    =>   "\xAC",   # not sign
!     "shy"    =>   "\xAD",   # soft hyphen
!     "reg"    =>   "\xAE",   # registered trademark
!     "macr"   =>   "\xAF",   # macron, overline
!     "deg"    =>   "\xB0",   # degree sign
!     "plusmn" =>   "\xB1",   # plus-minus sign
!     "sup2"   =>   "\xB2",   # superscript 2
!     "sup3"   =>   "\xB3",   # superscript 3
!     "acute"  =>   "\xB4",   # acute accent
!     "micro"  =>   "\xB5",   # micro sign
!     "para"   =>   "\xB6",   # pilcrow sign = paragraph sign
!     "middot" =>   "\xB7",   # middle dot = Georgian comma
!     "cedil"  =>   "\xB8",   # cedilla
!     "sup1"   =>   "\xB9",   # superscript 1
!     "ordm"   =>   "\xBA",   # masculine ordinal indicator
!     "raquo"  =>   "\xBB",   # right pointing double angle quotation mark
!     "frac14" =>   "\xBC",   # vulgar fraction one quarter
!     "frac12" =>   "\xBD",   # vulgar fraction one half
!     "frac34" =>   "\xBE",   # vulgar fraction three quarters
!     "iquest" =>   "\xBF",   # inverted question mark
!     "times"  =>   "\xD7",   # multiplication sign
!     "divide" =>   "\xF7",   # division sign
  );
  
  

Reply via email to