Don't use NOERROR arg of require.
authorueno <ueno>
Mon, 23 Oct 2006 08:21:22 +0000 (08:21 +0000)
committerueno <ueno>
Mon, 23 Oct 2006 08:21:22 +0000 (08:21 +0000)
ChangeLog
mixi.el

index 71c3a97..3b0694c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,7 @@
 2006-10-23  Daiki Ueno  <ueno@unixuser.org>
 
        * mixi.el (mixi-curl-retrieve): New function.
+       (mixi-retrieve-function): Don't use NOERROR arg of require.
 
 2006-10-23  OHASHI Akira  <bg66@koka-in.org>
 
diff --git a/mixi.el b/mixi.el
index 4027a73..403be0a 100644 (file)
--- a/mixi.el
+++ b/mixi.el
 
 ;;; Code:
 
-(require 'url "url" t)
-(require 'w3m "w3m" t)
+(condition-case nil
+    (require 'url "url")
+  (error))
+
+(condition-case nil
+    (require 'w3m "w3m")
+  (error))
+
 (eval-when-compile (require 'cl))
 
 (defgroup mixi nil
   :group 'mixi)
 
 (defcustom mixi-retrieve-function
-  (if (and (require 'url "url" t)
-          (fboundp 'url-retrieve-synchronously))
+  (if (fboundp 'url-retrieve-synchronously)
       'mixi-w3-retrieve 'mixi-w3m-retrieve)
   "*The function for retrieving."
   :type '(choice (const :tag "Using w3" mixi-w3-retrieve)
                 (const :tag "Using w3m" mixi-w3m-retrieve)
+                (const :tag "Using curl" mixi-curl-retrieve)
                 (function :format "Other function: %v\n" :size 0))
   :group 'mixi)