Variable `tm:URL-regexp', `browse-url-browser-function' and function

`tm:browse-url' were moved to mime-text.el.

diff --git a/mime-def.el b/mime-def.el
index dc5bce7..8cab856 100644 (file)
--- a/mime-def.el
+++ b/mime-def.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: mime-def.el,v 0.12 1997-02-25 06:35:05 tmorioka Exp $
+;; Version: $Id: mime-def.el,v 0.13 1997-02-25 07:29:59 tmorioka Exp $
 ;; Keywords: definition, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -100,25 +100,6 @@
        ))))
 
 
-;;; @ for URL
-;;;
-
-(defvar tm:URL-regexp
-  "\\(http\\|ftp\\|file\\|gopher\\|news\\|telnet\\|wais\\|mailto\\):\\(//[-a-zA-Z0-9_.]+:[0-9]*\\)?[-a-zA-Z0-9_=?#$@~`%&*+|\\/.,]*[-a-zA-Z0-9_=#$@~`%&*+|\\/]")
-
-(defvar browse-url-browser-function nil)
-
-(defun tm:browse-url (&optional url)
-  (if (fboundp browse-url-browser-function)
-      (if url 
-        (funcall browse-url-browser-function url)
-      (call-interactively browse-url-browser-function))
-    (if (fboundp tm:mother-button-dispatcher)
-       (call-interactively tm:mother-button-dispatcher)
-      )
-    ))
-
-
 ;;; @ PGP
 ;;;