Fix typo.

[elisp/apel.git] / tinycustom.el

diff --git a/tinycustom.el b/tinycustom.el
index c737d53..3d32c00 100644 (file)
--- a/tinycustom.el
+++ b/tinycustom.el
@@ -2,8 +2,8 @@
 
 ;; Copyright (C) 1999 Mikio Nakajima <minakaji@osaka.email.ne.jp>
 
-;; Author: Mikio Nakajima <minakaji@osaka.email.ne.jp>
-;; Maintainer: Mikio Nakajima <minakaji@osaka.email.ne.jp>
+;; Author: Mikio Nakajima  <minakaji@osaka.email.ne.jp>
+;;         Katsumi Yamaoka <yamaoka@jpl.org>
 ;; Keywords: emulating, custom
 
 ;; This file is part of APEL (A Portable Emacs Library).
@@ -29,7 +29,7 @@
 ;; (custom.el bundled with v19 is old; does not have following macros.)
 ;;
 ;; DEFCUSTOM below has the same effect as the original DEFVAR has.
-;; DEFFACE below interprets almost all arguments.
+;; DEFFACE below interprets almost of all arguments.
 ;; DEFGROUP and DEFINE-WIDGET below are just nop macro.
 
 ;;; Code:
@@ -43,15 +43,15 @@ Third arg DOC is the group documentation.
 
 This is a nop defgroup only for emulating purpose."
   nil)
-    
-(defmacro-maybe defcustom (symbol value doc &rest args) 
+
+(defmacro-maybe defcustom (symbol value doc &rest args)
   "Declare SYMBOL as a customizable variable that defaults to VALUE.
 DOC is the variable documentation.
 
 This is a defcustom only for emulating purpose.
 Its effect is just as same as that of defvar."
   (` (defvar (, symbol) (, value) (, doc))))
-    
+
 (defvar-maybe frame-background-mode nil
   "*The brightness of the background.
 Set this to the symbol dark if your background color is dark, light if
@@ -98,9 +98,7 @@ match one of the ITEM.  The following REQ are defined:
 
 `background' (the value of `frame-background-mode', what color is used
 for the background text)
-  Should be one of `light' or `dark'.
-
-\[custom emulating macro]"
+  Should be one of `light' or `dark'."
   ((fboundp 'make-face)
    (` (let ((name (quote (, face))))
        (or
@@ -157,7 +155,9 @@ The third argument DOC is a documentation string for the widget.
 This is a nop define-widget only for emulating purpose."
   nil)
 
-(provide 'tinycustom)
 (provide 'custom)
 
-;;; tinycustom.el ends here.
+(require 'product)
+(product-provide (provide 'tinycustom) (require 'apel-ver))
+
+;;; tinycustom.el ends here