branch: externals/idlwave
commit fcb9149ccbd70e4f5cfe247f62f9eb3187ffbbf2
Author: jdsmith <jdsmith>
Commit: jdsmith <jdsmith>
- Updated copyright dates.
- Trim property whitespace.
---
get_html_rinfo | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/get_html_rinfo b/get_html_rinfo
index 3c481457b7..8c9de2fcca 100755
--- a/get_html_rinfo
+++ b/get_html_rinfo
@@ -188,7 +188,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
-# along with GNU Emacs; see the file COPYING. If not, write to the
+# along with this file; see the file COPYING. If not, write to the
# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
#============================================================================
@@ -204,6 +204,8 @@ GetOptions("-debug" => \$debug,
"-xclass=s" => \$ignore_class_re)
or usage();
+$emacs=1;
+
my (%special_topics,%e,%special_sections,%sysvars,%txt_kwds,%properties,
%executive_commands,@syntax_kwds,@rejects,@complaints,@add_keywords,
@enter);
@@ -305,6 +307,7 @@ foreach $file (@files) {
my ($link,$prop,$txt)=@_;
return if $prop=~/^\s*$/;
foreach $prop (split(/,\s*/,$prop)) {
+ $prop=~s/ *$//;
$properties{$prop_class}{kwds}{$prop}{link}=$link;
foreach (qw(Get Set Init)) {
if ($txt=~ m{$_:(?:<.*?>\s*)*\s*Yes}i) {
@@ -1167,7 +1170,7 @@ sub write_rinfo_header {
print RINFO <<EOF;
;;; idlw-rinfo.el --- Routine Information for IDLWAVE
;; Copyright (c) 1999 Carsten Dominik
-;; Copyright (c) 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation
+;; Copyright (c) 1999,2000,2001,2002,2003,2004,2005 Free Software Foundation
;; Author: J.D. Smith <jdsmith\@as.arizona.edu>
;; Version: VERSIONTAG