(IS_DIRECTORY_SEP): New macro.

(put_filename): Remove unused variable len.  Use IS_DIRECTORY_SEP
instead of a literal '/'.

diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index eaf07239901712b49f10bd68dcf2e7aaf82f4ecb..e2fcc6cc939e6c63df849e3956ab5bed850b36b1 100644 (file)
--- a/lib-src/ChangeLog
+++ b/lib-src/ChangeLog
@@ -1,3 +1,9 @@
+2004-04-26  Eli Zaretskii  <eliz@gnu.org>
+
+       * make-docfile.c (IS_DIRECTORY_SEP): New macro.
+       (put_filename): Remove unused variable len.  Use IS_DIRECTORY_SEP
+       instead of a literal '/'.
+
 2004-04-23  Juanma Barranquero  <lektu@terra.es>
 
        * makefile.w32-in: Add "-*- makefile -*-" mode tag.

diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index ba73f5800a745a1fb7680948e64c03990efdb67e..1c0bc55922534abf5f2d1290a214be93a0afabc8 100644 (file)
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -60,6 +60,10 @@ Boston, MA 02111-1307, USA.  */
 #define READ_BINARY "r"
 #endif /* not DOS_NT */
 
+#ifndef IS_DIRECTORY_SEP
+#define IS_DIRECTORY_SEP(_c_) ((_c_) == '/')
+#endif
+
 int scan_file ();
 int scan_lisp_file ();
 int scan_c_file ();
@@ -183,11 +187,13 @@ void
 put_filename (filename)
      char *filename;
 {
-  char *tmp = filename;
-  int len;
-  
-  while ((tmp = index (filename, '/')))
-    filename = tmp + 1;
+  char *tmp;
+
+  for (tmp = filename; *tmp; tmp++)
+    {
+      if (IS_DIRECTORY_SEP(*tmp))
+       filename = tmp + 1;
+    }
 
   putc (037, outfile);
   putc ('S', outfile);