summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@gnu.org>1997-07-26 19:12:35 +0000
committerKarl Berry <karl@gnu.org>1997-07-26 19:12:35 +0000
commit2d29a55137e3d736217a753768c054aa75d82893 (patch)
tree3493d399f255f4b676de74e4cd574ff8c706c375
parent806c7aa46c95f1c36a2cb37ef92c1b058ea48860 (diff)
downloadgunmake-2d29a55137e3d736217a753768c054aa75d82893.tar.gz
(\email): Let to \uref instead of \code, as a second optional argument
makes sense for this, too.
-rw-r--r--texinfo.tex13
1 files changed, 8 insertions, 5 deletions
diff --git a/texinfo.tex b/texinfo.tex
index e6fda96..45e190e 100644
--- a/texinfo.tex
+++ b/texinfo.tex
@@ -1402,14 +1402,12 @@ where each line of input produces a line of output.}
\else{\tclose{\kbdfont\look}}\fi
\else{\tclose{\kbdfont\look}}\fi}
-% @url, @email. Quotes do not seem necessary.
-\let\url=\code % perhaps include a hypertex \special eventually
-% rms does not like the angle brackets --karl, 17may97.
-%\def\email#1{$\langle${\tt #1}$\rangle$}
-\let\email=\code
+% @url. Quotes do not seem necessary, so use \code.
+\let\url=\code
% @uref (abbreviation for `urlref') takes an optional second argument
% specifying the text to display. First (mandatory) arg is the url.
+% Perhaps eventually put in a hypertex \special here.
%
\def\uref#1{\urefxxx #1,,\finish}
\def\urefxxx#1,#2,#3\finish{%
@@ -1421,6 +1419,11 @@ where each line of input produces a line of output.}
\fi
}
+% rms does not like the angle brackets --karl, 17may97.
+% So now @email is just like @uref.
+%\def\email#1{$\langle${\tt #1}$\rangle$}
+\let\email=\uref
+
% Check if we are currently using a typewriter font. Since all the
% Computer Modern typewriter fonts have zero interword stretch (and
% shrink), and it is reasonable to expect all typewriter fonts to have