Correct misspellings.

* APEL-CFG:
* README.ja (replace-as-filename):
* broken.el (broken-facility):
* emu.el:
* make.bat:
* pces-nemacs.el (as-binary-process):
* poe-18.el (read-from-minibuffer, get-buffer-window, walk-windows):
* poe.el (string-to-number):
* product.el (product-add-checkers):

diff --git a/APEL-CFG b/APEL-CFG
index 7605343..d11d4f0 100644 (file)
--- a/APEL-CFG
+++ b/APEL-CFG
@@ -63,7 +63,7 @@
 
 ;; (setq PREFIX "/usr/local")
 
-;; Mule based on Emacs 19.28 and eariler.
+;; Mule based on Emacs 19.28 and earlier.
 ;; (setq LISPDIR "/usr/local/share/mule/site-lisp")
 ;; Mule based on Emacs 19.29 and later.
 ;; (setq LISPDIR "/usr/local/share/emacs/site-lisp")

diff --git a/README.ja b/README.ja
index 1a4d7ad..497bd06 100644 (file)
--- a/README.ja
+++ b/README.ja
@@ -452,7 +452,7 @@ MODULE \e$B$,Ds6!$5$l$F$$$k\e(B (provided) \e$B$+!"\e(BPATHS \e$B$KB8:_$9$k>l9g$K\e(B
 
 STRING \e$B$+$i0BA4$J%U%!%$%kL>$rJV$7$^$9!#\e(B
 
-\e$B$=$l$OJQ?t\e(B 'filename-fileters' \e$B$r;2>H$7$^$9!#$=$NJQ?t$O%U%!%$%kL>$NA*\e(B
+\e$B$=$l$OJQ?t\e(B 'filename-filters' \e$B$r;2>H$7$^$9!#$=$NJQ?t$O%U%!%$%kL>$NA*\e(B
 \e$BJL4o$N$?$a$N4X?t$N%j%9%H$G$9!#=i4|@_Dj$NA*JL4o$O0J2<$NJQ?t$r;2>H$7$F$$\e(B
 \e$B$^$9!#\e(B
 

diff --git a/broken.el b/broken.el
index c74eb63..08d9f15 100644 (file)
--- a/broken.el
+++ b/broken.el
@@ -1,4 +1,4 @@
-;;; broken.el --- Emacs broken facility infomation registry.
+;;; broken.el --- Emacs broken facility information registry.
 
 ;; Copyright (C) 1998, 1999 Tanaka Akira <akr@jaist.ac.jp>
 
@@ -56,7 +56,7 @@ ASSERTION is evaluated statically.
 
 FACILITY must be symbol.
 
-If ASSERTION is not ommited and evaluated to nil and NO-NOTICE is nil,
+If ASSERTION is not omitted and evaluated to nil and NO-NOTICE is nil,
 it is noticed."
   (` (static-if (, assertion)
         (eval-and-compile

diff --git a/emu.el b/emu.el
index 40b70b2..7ce3e44 100644 (file)
--- a/emu.el
+++ b/emu.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Keywords: emulation, compatibility, NEmacs, MULE, Emacs/mule, XEmacs
+;; Keywords: emulation, compatibility, Nemacs, MULE, Emacs/mule, XEmacs
 
 ;; This file is part of emu.
 
@@ -118,7 +118,7 @@ TABLE defaults to the current buffer's category table."
              ))
        )
       ((boundp 'NEMACS)
-       ;; for NEmacs and NEpoch
+       ;; for Nemacs and Nepoch
 
        ;; old MULE emulation
        (defconst *noconv*    0)

diff --git a/make.bat b/make.bat
index 9061436..3291e6f 100755 (executable)
--- a/make.bat
+++ b/make.bat
@@ -5,7 +5,7 @@ rem * Edit following lines to set PREFIX, EMACS, LISPDIR and VLISPDIR  *
 rem * according to your environment                                    *\r
 rem ********************************************************************\r
 rem * for Meadow                                                       *\r
-rem *   If you use Meadow on Windows NT, use meadowNT.exe insted of    *\r
+rem *   If you use Meadow on Windows NT, use meadowNT.exe instead of   *\r
 rem *   meadow95.exe                                                   *\r
 set MEADOWVER=1.10\r
 set PREFIX=c:\usr\meadow\r

diff --git a/pces-nemacs.el b/pces-nemacs.el
index 6f29ea1..314ab82 100644 (file)
--- a/pces-nemacs.el
+++ b/pces-nemacs.el
@@ -101,7 +101,7 @@
 
 (defmacro as-binary-process (&rest body)
   (` (let (selective-display   ; Disable ^M to nl translation.
-          ;; NEmacs
+          ;; Nemacs
           kanji-flag
           (default-kanji-process-code 0)
           program-kanji-code-alist)

diff --git a/poe-18.el b/poe-18.el
index 033312f..02dd5ef 100644 (file)
--- a/poe-18.el
+++ b/poe-18.el
@@ -573,7 +573,7 @@ Third arg KEYMAP is a keymap to use whilst reading;
 If fourth arg READ is non-nil, then interpret the result as a lisp object
   and return that object:
   in other words, do `(car (read-from-string INPUT-STRING))'
-Fifth arg HIST is ignored in this implementatin."
+Fifth arg HIST is ignored in this implementation."
        (si:read-from-minibuffer prompt initial-contents keymap read))))
 
 ;; Add optional argument `frame'.
@@ -582,7 +582,7 @@ Fifth arg HIST is ignored in this implementatin."
       (fset 'si:get-buffer-window (symbol-function 'get-buffer-window))
       (defun get-buffer-window (buffer &optional frame)
        "Return a window currently displaying BUFFER, or nil if none.
-Optional argunemt FRAME is ignored in this implementation."
+Optional argument FRAME is ignored in this implementation."
        (si:get-buffer-window buffer))))
 
 (defun-maybe walk-windows (proc &optional minibuf all-frames)
@@ -593,7 +593,7 @@ Optional second arg MINIBUF t means count the minibuffer window even
 if not active.  MINIBUF nil or omitted means count the minibuffer iff
 it is active.  MINIBUF neither t nor nil means not to count the
 minibuffer even if it is active.
-Optional third argunemt ALL-FRAMES is ignored in this implementation."
+Optional third argument ALL-FRAMES is ignored in this implementation."
   (if (window-minibuffer-p (selected-window))
       (setq minibuf t))
   (let* ((walk-windows-start (selected-window))
@@ -614,7 +614,7 @@ No argument or nil as argument means do this for the current buffer."
 
 ;;; @@ Frame (Emacs 18 cannot make frame)
 ;;;
-;; The following four are frequently used for manupulating the current frame.
+;; The following four are frequently used for manipulating the current frame.
 ;; frame.el has `screen-width', `screen-height', `set-screen-width' and
 ;; `set-screen-height' for backward compatibility and declare them as obsolete.
 (defun frame-width (&optional frame)

diff --git a/poe.el b/poe.el
index 2b0e3d4..272abd7 100644 (file)
--- a/poe.el
+++ b/poe.el
@@ -292,7 +292,7 @@ Completion ignores case if the ambient value of
         (if (fboundp 'string-to-number)
             (fset 'si:string-to-number (symbol-function 'string-to-number))
           (fset 'si:string-to-number (symbol-function 'string-to-int))
-          ;; XXX: In v18, this causes infinite loop while bytecompiling.
+          ;; XXX: In v18, this causes infinite loop while byte-compiling.
           ;; (defalias 'string-to-int 'string-to-number)
           )
         (put 'string-to-number 'defun-maybe t)

diff --git a/product.el b/product.el
index a91606e..32fc6bf 100644 (file)
--- a/product.el
+++ b/product.el
@@ -135,7 +135,7 @@ PRODUCT-NAME is a string of the product's name."
   "Add checker function(s) to a product.
 PRODUCT is a product structure which returned by `product-define'.
 The rest arguments CHECKERS should be functions.  These functions
-are regist to the product's checkers list, and will be called by
+are registered to the product's checkers list, and will be called by
  `product-run-checkers'.
 If a checker is `ignore' will be ignored all checkers after this."
   (setq product (product-find product))