(Perl_functions): Fix call to skip_spaces.

2 files changed, 7 insertions, 3 deletions

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"))
         {