branch: externals/auctex
commit 601e6a332b070286988facdc5a56eafd09960147
Author: Ikumi Keita <ik...@ikumi.que.jp>
Commit: Ikumi Keita <ik...@ikumi.que.jp>

    Get rid of gabage in generated texi file
    
    * doc/preview-dtxdoc.pl (MAIN): Add rule to delete dtx comment ^^A.
    (): Add coding tag. Update copyright year.
---
 doc/preview-dtxdoc.pl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/doc/preview-dtxdoc.pl b/doc/preview-dtxdoc.pl
index 62d215d..52d28cb 100755
--- a/doc/preview-dtxdoc.pl
+++ b/doc/preview-dtxdoc.pl
@@ -1,11 +1,12 @@
 #!/usr/bin/perl
+# -*- coding: iso-latin-1-unix; -*-
 
 # Autoconverter from preview.dtx to preview-dtxdoc.texi
 
 # Author: Jan-�ke Larsson <ja...@mai.liu.se>
 # Maintainer: auctex-de...@gnu.org
 
-# Copyright (C) 2002, 2005 Free Software Foundation, Inc.
+# Copyright (C) 2002, 2005, 2020 Free Software Foundation, Inc.
 
 # This file is part of AUCTeX.
 
@@ -53,6 +54,9 @@ MAIN: while (<STDIN>) {
     s/^%//;
     s/\\%/%/g;
 
+    # Comment
+    s/\^\^A.*\n//;
+
     # Text-substitution macros
     s/\@/\@\@/g;
     s/\\#/#/g;

Reply via email to