(exec-installed-p): Use `file-executable-p' instead of `file-exists-p'.

[elisp/apel.git] / pcustom.el

diff --git a/pcustom.el b/pcustom.el
index fd63bbe..927a4e6 100644 (file)
--- a/pcustom.el
+++ b/pcustom.el
@@ -27,6 +27,7 @@
 
 ;;; Code:
 
+(require 'poe)
 ;; If old compiler is used under v18, `eval-when-compile' and
 ;; `static-if' are expanded (and evaluated) at *load-time*.
 (eval-when-compile (require 'static))
@@ -41,15 +42,16 @@
             (error nil))
     ;; you have "new custom". no load-time check.
     (require 'custom)
-  ;; your custom is "old custom", or you don't have custom library.
+  ;; your custom is "old custom", or you don't have custom library
+  ;; at compile-time.
   (or (condition-case nil
          ;; load-time check.
-         ;; "new custom" requires widget library.
-         (and (require 'widget)
-              (require 'custom)
+         ;; load "custom" if exists.
+         (and (require 'custom)
               (fboundp 'custom-declare-variable))
        (error nil))
-      ;; load emulation version.
+      ;; your custom is "old custom", or you don't have custom library.
+      ;; load emulation version of "new custom".
       (require 'tinycustom)))
 
 (provide 'pcustom)