X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=richtext.el;h=def5c2868734276ec0b5488a642aad9d1af51f2c;hb=24a998b8c391b1af8b9e28dc405603b4a28fdcca;hp=677711a6543193397142772780541987115544aa;hpb=9ac0560a22f11fb6569a5944122ec3361605267d;p=elisp%2Fapel.git

diff --git a/richtext.el b/richtext.el
index 677711a..def5c28 100644
--- a/richtext.el
+++ b/richtext.el
@@ -4,7 +4,7 @@
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/7/15
-;; Version: $Id: richtext.el,v 3.5 1997/01/30 16:55:00 morioka Exp $
+;; Version: $Id: richtext.el,v 3.6 1997/06/28 17:58:34 morioka Exp $
 ;; Keywords: wp, faces, MIME, multimedia
 
 ;; This file is not part of GNU Emacs yet.
@@ -76,6 +76,7 @@ of this structure.")
 ;;; @ encoder
 ;;;
 
+;;;###autoload
 (defun richtext-encode (from to)
   (if enriched-verbose (message "Richtext: encoding document..."))
   (save-restriction
@@ -136,6 +137,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
 	       ))
 	))))
 
+;;;###autoload
 (defun richtext-decode (from to)
   (if enriched-verbose (message "Richtext: decoding document..."))
   (save-excursion
@@ -177,6 +179,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
 ;;; @ end
 ;;;
 
-(provide 'richtext)
+(require 'product)
+(product-provide (provide 'richtext) (require 'apel-ver))
 
 ;;; richtext.el ends here