From e61aad2fb8fe97b13e78874655d45b302a9bac17 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Fri, 4 Jan 2008 03:13:26 +0000
Subject: [PATCH] (tramp-smb-handle-insert-directory): Use mapc rather than
 mapcar.

---
 lisp/net/tramp-smb.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el
index 1406f381922..e9fc92cbc0a 100644
--- a/lisp/net/tramp-smb.el
+++ b/lisp/net/tramp-smb.el
@@ -1,7 +1,7 @@
 ;;; tramp-smb.el --- Tramp access functions for SMB servers
 
 ;; Copyright (C) 2002, 2003, 2004, 2005, 2006,
-;;   2007 Free Software Foundation, Inc.
+;;   2007, 2008 Free Software Foundation, Inc.
 
 ;; Author: Michael Albinus <michael.albinus@gmx.de>
 ;; Keywords: comm, processes
@@ -472,7 +472,7 @@ PRESERVE-UID-GID is completely ignored."
 
 	;; Handle "-F" switch.
 	(when (string-match "F" switches)
-	  (mapcar
+	  (mapc
 	   (lambda (x)
 	     (when (not (zerop (length (car x))))
 	       (cond
-- 
2.39.2