Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

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):
  • Loading branch information...
commit f31211e532da22eaf83a1d762c5aa3011886b7c6 1 parent aae601c
yamaoka authored
View
2  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")
View
2  README.ja
@@ -452,7 +452,7 @@ MODULE $B$,Ds6!$5$l$F$$$k(B (provided) $B$+!"(BPATHS $B$KB8:_$9$k>l9g$K(B
STRING $B$+$i0BA4$J%U%!%$%kL>$rJV$7$^$9!#(B
-$B$=$l$OJQ?t(B 'filename-fileters' $B$r;2>H$7$^$9!#$=$NJQ?t$O%U%!%$%kL>$NA*(B
+$B$=$l$OJQ?t(B 'filename-filters' $B$r;2>H$7$^$9!#$=$NJQ?t$O%U%!%$%kL>$NA*(B
$BJL4o$N$?$a$N4X?t$N%j%9%H$G$9!#=i4|@_Dj$NA*JL4o$O0J2<$NJQ?t$r;2>H$7$F$$(B
$B$^$9!#(B
View
4 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
View
4 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)
View
2  make.bat
@@ -5,7 +5,7 @@ rem * Edit following lines to set PREFIX, EMACS, LISPDIR and VLISPDIR *
rem * according to your environment *
rem ********************************************************************
rem * for Meadow *
-rem * If you use Meadow on Windows NT, use meadowNT.exe insted of *
+rem * If you use Meadow on Windows NT, use meadowNT.exe instead of *
rem * meadow95.exe *
set MEADOWVER=1.10
set PREFIX=c:\usr\meadow
View
2  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)
View
8 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)
View
2  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)
View
2  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))
Please sign in to comment.
Something went wrong with that request. Please try again.