# HG changeset patch
# User Michael Albinus <michael.albinus@gmx.de>
# Date 1206822326 0
# Node ID bc76dffd89c0e213acff7b8016f1acdc7c2dbfc6
# Parent  93506066d674235098fa99c03b10ebcb0cbd8355
* net/tramp-ftp.el: Require 'cl when byte-compiling.

diff -r 93506066d674 -r bc76dffd89c0 lisp/net/tramp-ftp.el
--- a/lisp/net/tramp-ftp.el	Sat Mar 29 20:24:42 2008 +0000
+++ b/lisp/net/tramp-ftp.el	Sat Mar 29 20:25:26 2008 +0000
@@ -32,7 +32,11 @@
 (require 'tramp)
 (autoload 'tramp-set-connection-property "tramp-cache")
 
-(eval-when-compile (require 'custom))
+(eval-when-compile
+
+  ;; Pacify byte-compiler.
+  (require 'cl)
+  (require 'custom))
 
 ;; Disable Ange-FTP from file-name-handler-alist.
 ;; To handle EFS, the following functions need to be dealt with: