From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 27 Feb 2008 20:48:57 +0000 (+0000)
Subject: (Perl_functions): Fix call to skip_spaces.
X-Git-Tag: emacs-pretest-22.1.92~53
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1797886fcceddcbc5c5d4afa5899ce455b71ab59;p=emacs.git

(Perl_functions): Fix call to skip_spaces.
---

diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index d98a441f8d8..089d979381b 100644
--- a/lib-src/ChangeLog
+++ b/lib-src/ChangeLog
@@ -1,3 +1,7 @@
+2008-02-27  Yuri Shtil  <yuris@juniper.net>  (tiny change)
+
+	* etags.c (Perl_functions): Fix call to skip_spaces.
+
 2008-01-22  Chong Yidong  <cyd@stupidchicken.com>
 
 	* pop.c (pop_stat, pop_last): Fix last fix.
@@ -19,8 +23,8 @@
 
 	* etags.c (default_C_help) [CTAGS]: differentiate the help string,
 	as the defaults in ctags are different from etags.
-	(default_C_help, Cplusplus_help, PHP_help, print_help): Remove
-	text saying --members is the default: not true in Emacs 22.
+	(default_C_help, Cplusplus_help, PHP_help, print_help):
+	Remove text saying --members is the default: not true in Emacs 22.
 
 2007-11-15  Francesco Potort,Al(B  <pot@gnu.org>
 
diff --git a/lib-src/etags.c b/lib-src/etags.c
index 52bcb8ad11d..951d408ec3c 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -4516,7 +4516,7 @@ Perl_functions (inf)
 
   LOOP_ON_INPUT_LINES (inf, lb, cp)
     {
-      skip_spaces(cp);
+      cp = skip_spaces (cp);
 
       if (LOOKING_AT (cp, "package"))
 	{