(Perl_functions): Fix call to skip_spaces.

diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index d98a441..089d979 100644 (file)
--- 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\e,Al\e(B  <pot@gnu.org>
 

diff --git a/lib-src/etags.c b/lib-src/etags.c
index 52bcb8a..951d408 100644 (file)
--- 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"))
        {