# HG changeset patch
# User Magnus Henoch <mange@freemail.hu>
# Date 1202107221 0
# Node ID 0fd27561386bef06a0b7bd45a14b850abfcbcee7
# Parent  2e2cf64c99ee3921392b650f6e3f55d69463485a
Require cl when compiling, for setf.

diff -r 2e2cf64c99ee -r 0fd27561386b lisp/url/url-expand.el
--- a/lisp/url/url-expand.el	Mon Feb 04 04:49:29 2008 +0000
+++ b/lisp/url/url-expand.el	Mon Feb 04 06:40:21 2008 +0000
@@ -26,6 +26,7 @@
 (require 'url-methods)
 (require 'url-util)
 (require 'url-parse)
+(eval-when-compile (require 'cl))
 
 (defun url-expander-remove-relative-links (name)
   ;; Strip . and .. from pathnames