From a904ddf49286a54357fa249a77934b67a822e9e3 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Wed, 30 Jan 2002 12:24:07 +0000
Subject: [PATCH] * lisp/liece-url.el (liece-url-browser-function): Use
 delegate.el.

---
 lisp/liece-url.el |    8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/liece-url.el b/lisp/liece-url.el
index 664614e..bac5ce7 100644
--- 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)
 
-- 
1.7.10.4