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