--- util.lisp	2006-08-03 12:41:22.000000000 +0200
+++ patched-util.lisp	2006-08-03 12:41:30.000000000 +0200
@@ -36,7 +36,8 @@
 (in-package #:cl-ppcre)
 
 #+:lispworks
-(import 'lw:with-unique-names)
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (import 'lw:with-unique-names))
 
 #-:lispworks
 (defmacro with-unique-names ((&rest bindings) &body body)
