From cee4a4a3f3024b08c3c95120b2c5d690260a8f49 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 27 Aug 1999 05:11:01 +0000 Subject: [PATCH] (directory-files): Use `static-condition-case' instead of `condition-case'. (TopLevel): Require `static' with `eval-when-compile'. --- path-util.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/path-util.el b/path-util.el index 071386e..3835d02 100644 --- a/path-util.el +++ b/path-util.el @@ -24,7 +24,9 @@ ;;; Code: -(condition-case nil +(eval-when-compile (require 'static)) + +(static-condition-case nil (directory-files "." nil nil t) (file-error nil);; unreadable directory. (wrong-number-of-arguments -- 1.7.10.4