home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / text / tex / 14684 < prev    next >
Encoding:
Text File  |  1993-01-06  |  730 b   |  24 lines
  1. Path: sparky!uunet!elroy.jpl.nasa.gov!usc!news.service.uci.edu!unogate!mvb.saic.com!info-tex
  2. From: wilcox@cmns.think.com
  3. Newsgroups: comp.text.tex
  4. Subject: wider macro
  5. Message-ID: <9301061943.AA15378@cmns-sun.think.com>
  6. Date: Wed, 6 Jan 93 14:43:29 EST
  7. Organization: Info-Tex<==>Comp.Text.Tex Gateway
  8. X-Gateway-Source-Info: Mailing List
  9. Lines: 13
  10.  
  11. I would like to write a TeX macro which inserts spaces after every letter in
  12. its argument. For example:
  13.  
  14.         WIDER  ->  W I D E R
  15.  
  16. My attempt works, but causes lots of error messages:
  17.  
  18. \def\wider#1{{\getwider#1\end}}
  19. \def\getwider#1{#1 \ifx#1\end \let\next=\relax \else \let\next=\getwider \next}
  20.  
  21. It also ignores spaces in the input, so all words get run together.
  22. Any suggestions?
  23.  
  24.