[Groff-commit] groff ./ChangeLog tmac/groff_www.man tmac/www.tmac

[Gaius Mulley]

CVSROOT:        /sources/groff
Module name:    groff
Branch:         
Changes by:     Gaius Mulley <address@hidden>   06/01/15 21:20:56

Modified files:
        .              : ChangeLog 
        tmac           : groff_www.man www.tmac 

Log message:
        * tmac/www.tmac: New macro LINKSTYLE which allows users
        to set various typographical url attributes for non HTML
        devices.
        * tmac/groff_www.man: Document LINKSTYLE.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/groff/ChangeLog.diff?tr1=1.883&tr2=1.884&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/groff/groff/tmac/groff_www.man.diff?tr1=1.18&tr2=1.19&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/groff/groff/tmac/www.tmac.diff?tr1=1.45&tr2=1.46&r1=text&r2=text

Patches:
Index: groff/ChangeLog
diff -u groff/ChangeLog:1.883 groff/ChangeLog:1.884
--- groff/ChangeLog:1.883       Wed Jan 11 00:37:42 2006
+++ groff/ChangeLog     Sun Jan 15 21:20:56 2006
@@ -1,3 +1,10 @@
+2006-01-15  Gaius Mulley  <address@hidden>
+
+       * tmac/www.tmac: New macro LINKSTYLE which allows users
+         to set various typographical url attributes for non HTML
+         devices.
+       * tmac/groff_www.man: Document LINKSTYLE.
+
 2006-01-11  Werner LEMBERG  <address@hidden>
 
        * configure.ac: Test for getc_unlocked (needed for localcharset).
Index: groff/tmac/groff_www.man
diff -u groff/tmac/groff_www.man:1.18 groff/tmac/groff_www.man:1.19
--- groff/tmac/groff_www.man:1.18       Tue Jan  3 23:57:03 2006
+++ groff/tmac/groff_www.man    Sun Jan 15 21:20:56 2006
@@ -102,6 +102,7 @@
 \&.LNS start a new two-column
        table with links in the left.
 \&.LNE end the two-column table.
+\&.LINKSTYLE   initialize default url attributes.
 .fi
 .PP
 Output of the
@@ -512,6 +513,20 @@
 End a two-column table.
 This should be called at the end of the document if .ALN was used.
 .
+.TP
+.B ".LINKSTYLE color [ fontstyle [ openglyph closeglyph ] ]"
+Initialize default url attributes to be used when this macro set is not used
+with the HTML device.
+The macro set initializes itself with the following call
+.RS
+.IP
+.nf
+.ft B
+\&.LINKSTYLE blue C \e[la] \e[ra]
+.ft P
+.fi
+.RE
+but these values will be superseded by a user call to LINKSTYLE.
 .
 .SH SECTION HEADING LINKS
 By default
Index: groff/tmac/www.tmac
diff -u groff/tmac/www.tmac:1.45 groff/tmac/www.tmac:1.46
--- groff/tmac/www.tmac:1.45    Tue Jan  3 23:57:03 2006
+++ groff/tmac/www.tmac Sun Jan 15 21:20:56 2006
@@ -358,23 +358,23 @@
 .      \}
 .      el \{\
 .        ie \\n[.color] \
-.          nop \%\[la]\m[blue]\f[C]\\*[\\$0:adr]\f[]\m[]\[ra]\\$3
+.          nop 
\%\\*[www:open]\m[\\*[www:color]]\f[\\*[www:fontstyle]]\\*[\\$0:adr]\f[]\m[]\\*[www:close]\\$3
 .        el \
-.          nop \%\[la]\f[CB]\\*[\\$0:adr]\f[]\[ra]\\$3
+.          nop 
\%\\*[www:open]\f[\\*[www:fontstyle]]\\*[\\$0:adr]\f[]\\*[www:close]\\$3
 .      \}
 .    \}
 .    el \{\
 .      ie '\\$1'' \{\
 .        ie \\n[.color] \
-.          nop \m[blue]\\$2\m[]\\$3
+.          nop \m[\\*[www:color]]\\$2\m[]\\$3
 .        el \
-.          nop \f[B]\\$2\f[]\\$3
+.          nop \f[\\*[www:fontstyle]]\\$2\f[]\\$3
 .      \}
 .      el \{\
 .        ie \\n[.color] \
-.          nop \m[blue]\\$2\m[] \%\[la]\f[C]\\*[\\$0:adr]\f[]\[ra]\\$3
+.          nop \m[\\*[www:color]]\\$2\m[] 
\%\\*[www:open]\f[\\*[www:fontstyle]]\\*[\\$0:adr]\f[]\\*[www:close]\\$3
 .        el \
-.          nop \f[B]\\$2\f[] \%\[la]\f[C]\\*[\\$0:adr]\f[]\[ra]\\$3
+.          nop \f[\\*[www:fontstyle]]\\$2\f[] 
\%\\*[www:open]\f[\\*[www:fontstyle]]\\*[\\$0:adr]\f[]\\*[www:close]\\$3
 .      \}
 .    \}
 .    if !r ps4html .ad
@@ -420,23 +420,23 @@
 .      \}
 .      el \{\
 .        ie \\n[.color] \
-.          nop \%\m[blue]\f[C]\\$1\f[]\m[]\\$3
+.          nop \%\m[\\*[www:color]]\f[\\*[www:fontstyle]]\\$1\f[]\m[]\\$3
 .        el \
-.          nop \%\f[CB]\\$1\f[]\\$3
+.          nop \%\f[\\*[www:fontstyle]]\\$1\f[]\\$3
 .      \}
 .    \}
 .    el \{\
 .      ie '\\$1'' \{\
 .        ie \\n[.color] \
-.          nop \m[blue]\\$2\m[]\\$3
+.          nop \m[\\*[www:color]]\\$2\m[]\\$3
 .        el \
-.          nop \f[B]\\$2\f[]\\$3
+.          nop \f[\\*[www:fontstyle]]\\$2\f[]\\$3
 .      \}
 .      el \{\
 .        ie \\n[.color] \
-.          nop \m[blue]\\$2\m[] \%\[la]\f[C]\\$1\f[]\[ra]\\$3
+.          nop \m[\\*[www:color]]\\$2\m[] 
\%\\*[www:open]\f[\\*[www:fontstyle]]\\$1\f[]\\*[www:close]\\$3
 .        el
-.          nop \f[B]\\$2\f[] \%\[la]\f[C]\\$1\f[]\[ra]\\$3
+.          nop \f[\\*[www:fontstyle]]\\$2\f[] 
\%\\*[www:open]\f[\\*[www:fontstyle]]\\$1\f[]\\*[www:close]\\$3
 .      \}
 .    \}
 .  \}
@@ -480,7 +480,7 @@
            width=\\n[www-width] height=\\n[www-height]>
 .  \}
 .  el \
-.    nop \[la]\f[C]\\$1\f[]\[ra]
+.    nop \\*[www:open]\f[\\*[www:fontstyle]]\\$1\f[]\\*[www:close]
 ..
 .
 .\" --------------------------------------------------------------------
@@ -1324,11 +1324,35 @@
 .  \}
 ..
 .
+.\" --------------------------------------------------------------------
+.\"  LINKSTYLE color [ fontstyle [ openglyph closeglyph ] ]
+.\"
+.\"    Initializes www.tmac so that when this macro set is used with
+.\"    non html devices the urls are rendered the user defined attributes.
+.\"    For example:
+.\"
+.\"    LINKSTYLE blue CR < >
+.\"
+.de LINKSTYLE
+.  if (\\n[.$] < 1) \
+.    www:error .\\$0 expects at least 1 argument.
+.  ds www:color \\$1
+.  shift
+.  if (\\n[.$] < 1) .return
+.  ds www:fontstyle \\$1
+.  shift
+.  if (\\n[.$] < 1) \
+.    www:error .\\$0 expects that both the open and close glyph is specified
+.  ds www:open \\$1
+.  ds www:close \\$2
+..
 .
 .\" --------------------------------------------------------------------
 .\" Final Setup
 .\" --------------------------------------------------------------------
 .
+.LINKSTYLE blue C \[la] \[ra]
+.
 .if \n[www-html] \{\
 .  nh
 .  nr HY 0