comparison lisp/net/quickurl.el @ 91302:56a72e2bd635

Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-306
author Miles Bader <miles@gnu.org>
date Sat, 29 Dec 2007 02:39:17 +0000
parents f55f9811f5d7 20bb7aaa7b12
children 606f2d163a64
comparison
equal deleted inserted replaced
91301:7774e5860c70 91302:56a72e2bd635
87 (eval-when-compile 87 (eval-when-compile
88 (require 'cl)) 88 (require 'cl))
89 (require 'thingatpt) 89 (require 'thingatpt)
90 (require 'pp) 90 (require 'pp)
91 (require 'browse-url) 91 (require 'browse-url)
92
93 ;; Attempt to handle older/other emacs.
94 (eval-and-compile
95 ;; If customize isn't available just use defvar instead.
96 (unless (fboundp 'defgroup)
97 (defmacro defgroup (&rest rest) nil)
98 (defmacro defcustom (symbol init docstring &rest rest)
99 `(defvar ,symbol ,init ,docstring))))
100 92
101 ;; Customize options. 93 ;; Customize options.
102 94
103 (defgroup quickurl nil 95 (defgroup quickurl nil
104 "Insert an URL based on text at point in buffer." 96 "Insert an URL based on text at point in buffer."