* lisp/liece-url.el (liece-url-browser-function): Use delegate.el.

diff --git a/lisp/liece-url.el b/lisp/liece-url.el
index 664614e..bac5ce7 100644 (file)
--- a/lisp/liece-url.el
+++ b/lisp/liece-url.el
@@ -34,7 +34,7 @@
   (require 'liece-intl)
   (require 'liece-menu))
 
-(defvar browse-url-browser-function)
+(require 'delegate)
 
 (defgroup liece-url nil
   "URL Browsing in IRC buffer."
@@ -45,7 +45,11 @@
   :group 'liece-url
   :type 'regexp)
 
-(defcustom liece-url-browser-function browse-url-browser-function
+(define-delegated-variable-alias 'browse-url-browser-function
+    'liece-url-browser-function
+  "browse-url")
+(defcustom liece-url-browser-function
+  (delegated-variable-get-safe 'liece-url-browser-function)
   "Default URL Browser."
   :group 'liece-url)