(Perl_functions): Fix call to skip_spaces.

[bpt/emacs.git] / lib-src / etags.c

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