X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=contrib%2Ftexi2pod.pl;h=a22fd4fe692266c908e6cd572625827b4efff599;hb=59fce248d4644a9976864b42523ffbca5eab2ed3;hp=9d4bb541903eaf13e1df5d2ceea98d2d91c45594;hpb=1e332b0bfa86f1a801fe92bf8f16df5fea321c20;p=pf3gnuchains%2Fgcc-fork.git diff --git a/contrib/texi2pod.pl b/contrib/texi2pod.pl index 9d4bb541903..a22fd4fe692 100755 --- a/contrib/texi2pod.pl +++ b/contrib/texi2pod.pl @@ -16,8 +16,8 @@ # You should have received a copy of the GNU General Public License # along with GCC; see the file COPYING. If not, write to -# the Free Software Foundation, 59 Temple Place - Suite 330, -# Boston MA 02111-1307, USA. +# the Free Software Foundation, 51 Franklin Street, Fifth Floor, +# Boston MA 02110-1301, USA. # This does trivial (and I mean _trivial_) conversion of Texinfo # markup to Perl POD format. It's intended to be used to extract @@ -349,6 +349,9 @@ sub postprocess s/\@w\{([^\}]*)\}/S<$1>/g; s/\@(?:dmn|math)\{([^\}]*)\}/$1/g; + # keep references of the form @ref{...}, print them bold + s/\@(?:ref)\{([^\}]*)\}/B<$1>/g; + # Cross references are thrown away, as are @noindent and @refill. # (@noindent is impossible in .pod, and @refill is unnecessary.) # @* is also impossible in .pod; we discard it and any newline that