Commit f6b1b0a8 authored by Paul Eggert's avatar Paul Eggert
Browse files

Spelling fixes.

parent 1c889bf6
......@@ -20,7 +20,7 @@
# Commentary:
# Genereate a translation table for CP51932 (EUC-JP of MicroSoft Version).
# Generate a translation table for CP51932 (EUC-JP of MicroSoft Version).
# It maps invalid JISX0208 code points used by CP51932 to Unicode.
# 4th field of the input has these meanings:
# 0: JISX0208 characters.
......
......@@ -173,7 +173,7 @@ This restores file, but without its history (`bzr log file' will be
very short). This is because file gets re-added with a new file-id
(use `bzr file-id file' to see the id).
Insteading of adding the file, try:
Instead of adding the file, try:
bzr revert -rN file; bzr commit
......
......@@ -2827,7 +2827,7 @@ If @code{file-remote-p} returns the same identifier for two different
filenames, that means they are stored on the same file system and can
be accessed locally with respect to each other. This means, for
example, that it is possible to start a remote process accessing both
files at the same time. Implementors of file handlers need to ensure
files at the same time. Implementers of file handlers need to ensure
this principle is valid.
@var{identification} specifies which part of the identifier shall be
......
......@@ -6097,7 +6097,7 @@ readline (linebuffer *lbp, FILE *stream)
lineno += 1; /* increment global line number */
charno += result; /* increment global char number */
/* Honour #line directives. */
/* Honor #line directives. */
if (!no_line_directive)
{
static bool discard_until_line_directive;
......
......@@ -291,7 +291,7 @@ local definitions."
;; Try and find a trail of parents from PARENT
(let ((rlist (list parent))
)
;; IMPLELEMENT ME!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
;; IMPLEMENT ME!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
(reverse rlist)))
(define-overloadable-function semantic-format-tag-canonical-name (tag &optional parent color)
......
......@@ -61,7 +61,7 @@
(define-mode-local-override semantic-parse-region
html-mode (&rest ignore)
"Parse the current html buffer for semantic tags.
INGNORE any arguments. Always parse the whole buffer.
IGNORE any arguments. Always parse the whole buffer.
Each tag returned is of the form:
(\"NAME\" section (:members CHILDREN))
or
......
......@@ -421,7 +421,7 @@ Optional argument POINT is where to look for the environment."
texinfo-mode (context)
"List smart completions at point.
Since texinfo is not a programming language the default version is not
useful. Insted, look at the current symbol. If it is a command
useful. Instead, look at the current symbol. If it is a command
do primitive texinfo built ins. If not, use ispell to lookup words
that start with that symbol."
(let ((prefix (car (oref context :prefix)))
......
......@@ -366,7 +366,7 @@ programming modes."
(define-key srecode-prefix-map oldkey nil)
)))
;; Update Keybings
;; Update Keybindings
(let ((oldbinding (lookup-key srecode-prefix-map binding)))
;; During development, allow overrides.
......
......@@ -92,7 +92,7 @@ Optional HEADERFCN should be called to insert a few bits of info first."
(princ "Class ")
(prin1 class)
(terpri)
;; Inheritence tree information
;; Inheritance tree information
(let ((pl (class-parents class)))
(when pl
(princ " Inherits from ")
......
;;; eieio.el --- Enhanced Implementation of Emacs Interpreted Objects
;;; or maybe Eric's Implementation of Emacs Intrepreted Objects
;;; or maybe Eric's Implementation of Emacs Interpreted Objects
;; Copyright (C) 1995-1996, 1998-2011 Free Software Foundation, Inc.
......
......@@ -1599,7 +1599,7 @@ as a Meta key and any number of multiple escapes are allowed."
;; call viper-execute-com to execute viper-exec-change, which eventually will
;; call viper-change to invoke the replace mode on the region.
;;
;; The var viper-d-com is set to (M-COM VAL COM REG INSETED-TEXT COMMAND-KEYS)
;; The var viper-d-com is set to (M-COM VAL COM REG INSERTED-TEXT COMMAND-KEYS)
;; via a call to viper-set-destructive-command, for later use by viper-repeat.
(defun viper-execute-com (m-com val com)
(let ((reg viper-use-register))
......
......@@ -79,7 +79,7 @@
;;; TODO:
;; o Generalise the display-line code so that we can use it to
;; o Generalize the display-line code so that we can use it to
;; display the stuff we send, as well as the stuff we receive.
;; Then, move all display-related code into another backend-like
;; file, erc-display.el, say.
......@@ -2000,4 +2000,3 @@ See `erc-display-error-notice'." nil
;; Local Variables:
;; indent-tabs-mode: nil
;; End:
......@@ -344,7 +344,7 @@ This function is explicit for adding to `eshell-parse-argument-hook'."
(pcomplete-here))))
(defun eshell/env (&rest args)
"Implemention of `env' in Lisp."
"Implementation of `env' in Lisp."
(eshell-init-print-buffer)
(eshell-eval-using-options
"env" args
......
......@@ -4727,7 +4727,7 @@ If LINE, insert the rebuilt thread starting on line LINE."
(car headers))))
(defun gnus-parent-headers (in-headers &optional generation)
"Return the headers of the GENERATIONeth parent of HEADERS."
"Return the headers of the GENERATIONth parent of HEADERS."
(unless generation
(setq generation 1))
(let ((parent t)
......
......@@ -432,8 +432,8 @@ and so on."
(const :tag "Lucid Toolkit" lucid )
(const :tag "Motif Toolkit" motif )))
(class (choice (const :tag "Colour" color )
(const :tag "Greyscale" grayscale)))
(class (choice (const :tag "Color" color )
(const :tag "Grayscale" grayscale)))
(background (choice (const :tag "Dark" dark )
(const :tag "Bright" light ))) ))
......
......@@ -43,7 +43,7 @@
;; CONVERSION-KEYS argument of the Quail package.
;; [There was an input method for Mule 2.3 called `Tamago' from the
;; Japanese `TAkusan MAtasete GOmenasai', or `Sorry for having you
;; Japanese `TAkusan MAtasete GOmen-nasai', or `Sorry for having you
;; wait so long'; this couldn't be included in Emacs 20. `Tamago' is
;; Japanese for `egg' (implicitly a hen's egg). Handa-san made a
;; smaller and simpler system; the smaller quail egg is also eaten in
......@@ -1377,7 +1377,7 @@ Return the input string."
(set-buffer-modified-p modified-p)
(quail-show-guidance)
(let* ((prompt (if input-method-use-echo-area
(format "%s%s %s"
(format "%s%s %s"
(or input-method-previous-message "")
quail-current-str
quail-guidance-str)))
......@@ -1443,7 +1443,7 @@ Return the input string."
(quail-setup-overlays nil)))
(quail-show-guidance)
(let* ((prompt (if input-method-use-echo-area
(format "%s%s%s %s"
(format "%s%s%s %s"
(or input-method-previous-message "")
quail-conversion-str
quail-current-str
......@@ -2125,7 +2125,7 @@ minibuffer and the selected frame has no other windows)."
(- quail-guidance-translations-starting-column
7 (string-width str))
32))))
(setq str (format "%s(%02d/%s)"
(setq str (format "%s(%02d/%s)"
str (nth 3 indices)
(if (nth 4 indices)
(format "%02d" (nth 4 indices))
......@@ -2135,7 +2135,7 @@ minibuffer and the selected frame has no other windows)."
(trans (aref (cdr quail-current-translations) idx)))
(or (stringp trans)
(setq trans (string trans)))
(setq str (format "%s %d.%s"
(setq str (format "%s %d.%s"
str
(if (= (- idx start) 9) 0
(1+ (- idx start)))
......@@ -2787,7 +2787,7 @@ If CHAR is an ASCII character and can be input by typing itself, return t."
(cdr decode-map)))
(let ((key-head (aref decode-map char)))
(if (stringp key-head)
(setq key-list (quail-find-key1
(setq key-list (quail-find-key1
(quail-lookup-key key-head nil t)
key-head char nil))
(mapc #'(lambda (elt)
......
......@@ -229,7 +229,7 @@
;; As stated in Murphy's law, it took longer than expected to develop the
;; very first version of Japanese input subsystem in NEmacs (Nihongo
;; Emacs). So the subsystem was named "TAMAGO", which is an acronym of
;; "TAkusan Matasete GOmennasai" (Sorry to have kept you waiting so
;; "TAkusan Matasete GOmen-nasai" (Sorry to have kept you waiting so
;; long). "Tamago" as a Japanese word means "egg", so the word "egg" was
;; also used for related filenames and function names.
......
......@@ -2447,7 +2447,7 @@ of citations entirely, choose \"None\"."
"Followup-To:" ; RFC 1036
"For-Approval:" ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
"For-Comment:" ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
"For-Handdling:" ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
"For-Handling:" ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
"Forwarded:" ; MH
"From " ; sendmail
"Generate-Delivery-Report:" ; RFC 2156
......
......@@ -145,7 +145,7 @@ association to the service from D-Bus."
(service (car value))
(entry (gethash key dbus-registered-objects-table))
ret)
;; key has the structure (BUS INTERRFACE MEMBER).
;; key has the structure (BUS INTERFACE MEMBER).
;; value has the structure (SERVICE PATH [HANDLER]).
;; entry has the structure ((UNAME SERVICE PATH MEMBER [RULE]) ...).
;; MEMBER is either a string (the handler), or a cons cell (a
......
......@@ -32,7 +32,7 @@
;; `soap-invoke' method passing it the WSDL, the service name, the operation
;; you wish to invoke and any required parameters.
;;
;; Idealy, the service you want to access will have some documentation about
;; Ideally, the service you want to access will have some documentation about
;; the operations it supports. If it does not, you can try using
;; `soap-inspect' to browse the WSDL document and see the available operations
;; and their parameters.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment