X-Git-Url: http://sjero.net/git/?a=blobdiff_plain;f=doc%2Ftexi2pod.pl;h=9c6d8cc27928a958afad368eadcc9f7ab364cfa2;hb=d5e283b1a75c5f8249300b465b4e7b55130bec49;hp=daad3f6d706abb961aacf7709867c71ab61e2fb1;hpb=d3c982b1bd9b57f9c14205d7eee92599cf630283;p=wget

diff --git a/doc/texi2pod.pl b/doc/texi2pod.pl
index daad3f6d..9c6d8cc2 100755
--- a/doc/texi2pod.pl
+++ b/doc/texi2pod.pl
@@ -1,6 +1,7 @@
 #! /usr/bin/env perl
 
-#   Copyright (C) 1999, 2000, 2001, 2003 Free Software Foundation, Inc.
+#   Copyright (C) 1999, 2000, 2001, 2003, 2007 Free Software
+#   Foundation, Inc.
 
 # This file is part of GCC.
 
@@ -204,9 +205,9 @@ while(<$inf>) {
     # Now the ones that have to be replaced by special escapes
     # (which will be turned back into text by unmunge())
     s/&/&amp;/g;
+    s/\@\@/&at;/g;
     s/\@\{/&lbrace;/g;
     s/\@\}/&rbrace;/g;
-    s/\@\@/&at;/g;
 
     # Inside a verbatim block, handle @var specially.
     if ($shift ne "") {