Spelling fixes.

* lisp/org/ob-python.el (org-babel-python-with-earmuffs):
Rename from org-babel-python-with-earmufs.  All uses changed.
(org-babel-python-without-earmuffs):
Rename from org-babel-python-without-earmufs.  All uses changed.

16 files changed, 68 insertions, 61 deletions

diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 135ac7fec71..a9d2731892f 100644
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1,3 +1,11 @@
+2013-11-17  Paul Eggert  <eggert@cs.ucla.edu>
+
+        Spelling fixes.
+        * ob-python.el (org-babel-python-with-earmuffs):
+        Rename from org-babel-python-with-earmufs.  All uses changed.
+        (org-babel-python-without-earmuffs):
+        Rename from org-babel-python-without-earmufs.  All uses changed.
+
 2013-11-12  Bastien Guerry  <bzg@gnu.org>
 
         * org-agenda.el (org-agenda-set-restriction-lock): Autoload.
@@ -1887,7 +1895,7 @@
         when `org-prefix-has-breadcrumbs' is non-nil.
 
         * org.el (org-mode): Don't make characters from
-        `org-emphasis-alist' word constituants.
+        `org-emphasis-alist' word constituents.
         (org-mode-transpose-word-syntax-table): Rename from
         `org-syntax-table'.
         (org-transpose-words): Use
@@ -3394,7 +3402,7 @@
         (org-export--get-buffer-attributes): Store a default title.
         (org-export-as): Apply function removal.
         (org-export--get-global-options): Do not set a property with an
-        explicitely nil value.
+        explicitly nil value.
 
         * ox-publish.el (org-publish-sitemap-sort-files)
         (org-publish-sitemap-sort-folders)
@@ -4526,7 +4534,7 @@
         the string returned will end with a single one.
 
         * ox-latex.el (org-latex-headline): When a function returns a
-        sectionning command, only one placeholder should be required.
+        sectioning command, only one placeholder should be required.
 
         * org-element.el (org-element-nested-p): Do not inline function.
 
@@ -5262,8 +5270,8 @@
         * org-entities.el (org-entities): Add support for ell, imath,
         jmath, varphi, varpi, aleph, gimel, beth, dalet, cdots, S (§),
         dag, ddag, colon, therefore, because, triangleq, leq, geq,
-        lessgtr, lesseqgtr, ll, lll, gg, ggg, prec, preceq, preccurleyeq,
-        succ, succeq, succurleyeq, setminus, nexist(s), mho, check, frown,
+        lessgtr, lesseqgtr, ll, lll, gg, ggg, prec, preceq, preccurlyeq,
+        succ, succeq, succurlyeq, setminus, nexist(s), mho, check, frown,
         diamond.  Changes loz, vert, checkmark, smile and tilde.
 
         * ob-C.el: Added C++ to `org-babel-load-languages' automatically
@@ -6358,7 +6366,7 @@
 
         * org.el (org-reload): Simplify file-re (orgtbl-*.el files do not
         exist anymore).  Keep org-*.el at the end of the files list.
-        Explicitely load org-version.el (since it doesn't provide feature
+        Explicitly load org-version.el (since it doesn't provide feature
         'org-version) at the very end, but ignore errors when it doesn't
         exist.  Add parameters 'full and 'message to the call of
         (org-version) so that after reload the full version information is
@@ -8147,7 +8155,7 @@
         * org.el (org-read-date): Set cursor-type to nil in the calendar.
 
         * org-faces.el (org-date-selected): Use inverse video.
-        Don't explicitely set bold to nil as it causes `customize-face' to show
+        Don't explicitly set bold to nil as it causes `customize-face' to show
         the weight property and thus encourage the user to change it.
         Warn in the docstring that using bold might cause problems when
         displaying the calendar.
@@ -9228,7 +9236,7 @@
         * org-agenda.el (org-agenda-skip-timestamp-if-deadline-is-shown):
         Skip timestamp items in agenda view if item is already shown as a
         deadline item.
-        (org-agenda-skip-dealine-if-done): Pass deadline results to
+        (org-agenda-skip-deadline-if-done): Pass deadline results to
         org-agenda-get-timestamps.
         (org-agenda-get-timestamps): Optionally take list of deadline
         results, so that timestamp results can be skipped if already
@@ -12430,7 +12438,7 @@
 2012-01-03  Nicolas Goaziou  <n.goaziou@gmail.com>
 
         * org-footnote.el (org-footnote-create-definition):
-        Explicitely move point after tag, if it has just been
+        Explicitly move point after tag, if it has just been
         inserted.
 
 2012-01-03  Eric Schulte  <schulte.eric@gmail.com>
diff --git a/lisp/org/ob-core.el b/lisp/org/ob-core.el
index 0ec945d6ad8..84caed7ea3b 100644
--- a/lisp/org/ob-core.el
+++ b/lisp/org/ob-core.el
@@ -318,7 +318,7 @@ Do not query the user."
            (message (format "Evaluation of this%scode-block%sis disabled."
                             code-block block-name))))))
 
- ;; dynamically scoped for asynchroneous export
+ ;; dynamically scoped for asynchronous export
 (defvar org-babel-confirm-evaluate-answer-no)
 
 (defsubst org-babel-confirm-evaluate (info)
diff --git a/lisp/org/ob-python.el b/lisp/org/ob-python.el
index b8f8a6daafa..99c35ce2863 100644
--- a/lisp/org/ob-python.el
+++ b/lisp/org/ob-python.el
@@ -156,14 +156,14 @@ Emacs-lisp table, otherwise return the results as a string."
   "Return the buffer associated with SESSION."
   (cdr (assoc session org-babel-python-buffers)))
 
-(defun org-babel-python-with-earmufs (session)
+(defun org-babel-python-with-earmuffs (session)
   (let ((name (if (stringp session) session (format "%s" session))))
     (if (and (string= "*" (substring name 0 1))
              (string= "*" (substring name (- (length name) 1))))
         name
       (format "*%s*" name))))
 
-(defun org-babel-python-without-earmufs (session)
+(defun org-babel-python-without-earmuffs (session)
   (let ((name (if (stringp session) session (format "%s" session))))
     (if (and (string= "*" (substring name 0 1))
              (string= "*" (substring name (- (length name) 1))))
@@ -190,9 +190,9 @@ then create.  Return the initialized session."
         (if (not (version< "24.1" emacs-version))
             (run-python cmd)
           (unless python-buffer
-            (setq python-buffer (org-babel-python-with-earmufs session)))
+            (setq python-buffer (org-babel-python-with-earmuffs session)))
           (let ((python-shell-buffer-name
-                 (org-babel-python-without-earmufs python-buffer)))
+                 (org-babel-python-without-earmuffs python-buffer)))
             (run-python cmd))))
        ((and (eq 'python-mode org-babel-python-mode)
              (fboundp 'py-shell)) ; python-mode.el
@@ -208,7 +208,7 @@ then create.  Return the initialized session."
                           (concat "Python-" (symbol-name session))))
                (py-which-bufname bufname))
           (py-shell)
-          (setq python-buffer (org-babel-python-with-earmufs bufname))))
+          (setq python-buffer (org-babel-python-with-earmuffs bufname))))
        (t
         (error "No function available for running an inferior Python")))
       (setq org-babel-python-buffers
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index 3af1947bd33..5ef92f7aaeb 100644
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -863,7 +863,7 @@ When set to the symbol `not-today', skip scheduled previously,
 but not scheduled today.
 
 When set to the symbol `repeated-after-deadline', skip scheduled
-items if they are repeated beyond the current dealine."
+items if they are repeated beyond the current deadline."
   :group 'org-agenda-skip
   :group 'org-agenda-daily/weekly
   :type '(choice
diff --git a/lisp/org/org-bibtex.el b/lisp/org/org-bibtex.el
index 52643994879..def9340e430 100644
--- a/lisp/org/org-bibtex.el
+++ b/lisp/org/org-bibtex.el
@@ -44,7 +44,7 @@
 ;; Here is an example of a capture template that use some of this
 ;; information (:author :year :title :journal :pages):
 ;;
-;; (setq org-capure-templates
+;; (setq org-capture-templates
 ;;   '((?b "* READ %?\n\n%a\n\n%:author (%:year): %:title\n   \
 ;;          In %:journal, %:pages.")))
 ;;
diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index 0b2037d0725..978bde475d4 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -667,7 +667,7 @@ previous clocking intervals."
 VALUE can be a number of minutes, or a string with format hh:mm or mm.
 When the string starts with a + or a - sign, the current value of the effort
 property will be changed by that amount.  If the effort value is expressed
-as an `org-effort-durations' (e.g. \"3h\"), the modificied value will be
+as an `org-effort-durations' (e.g. \"3h\"), the modified value will be
 converted to a hh:mm duration.
 
 This command will update the \"Effort\" property of the currently
diff --git a/lisp/org/org-src.el b/lisp/org/org-src.el
index 99038576ff7..259186c0ce3 100644
--- a/lisp/org/org-src.el
+++ b/lisp/org/org-src.el
@@ -69,7 +69,7 @@ there are kept outside the narrowed region."
 This will save the content of the source code editing buffer into
 a newly created file, not the base buffer for this source block.
 
-If you want to regularily save the base buffer instead of the source
+If you want to regularly save the base buffer instead of the source
 code editing buffer, see `org-edit-src-auto-save-idle-delay' instead."
   :group 'org-edit-structure
   :version "24.4"
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el
index 246cf8d605c..1ef90443935 100644
--- a/lisp/org/org-table.el
+++ b/lisp/org/org-table.el
@@ -97,11 +97,11 @@ this variable requires a restart of Emacs to become effective."
 Each template must define lines that will be treated as a comment and that
 must contain the \"BEGIN RECEIVE ORGTBL %n\" and \"END RECEIVE ORGTBL\"
 lines where \"%n\" will be replaced with the name of the table during
-insertion of the tempate.  The transformed table will later be inserted
+insertion of the template.  The transformed table will later be inserted
 between these lines.
 
 The template should also contain a minimal table in a multiline comment.
-If multiline comments are not possible in the buffer language, 
+If multiline comments are not possible in the buffer language,
 you can pack it into a string that will not be used when the code
 is compiled or executed.  Above the table will you need a line with
 the fixed string \"#+ORGTBL: SEND\", followed by instruction on how to
diff --git a/lisp/org/org.el b/lisp/org/org.el
index 8e23ec9f87f..50d3842e03d 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -713,7 +713,7 @@ the following lines anywhere in the buffer:
   "Non-nil means preview LaTeX fragments when loading a new Org file.
 
 This can also be configured on a per-file basis by adding one of
-the followinglines anywhere in the buffer:
+the following lines anywhere in the buffer:
    #+STARTUP: latexpreview
    #+STARTUP: nolatexpreview"
   :group 'org-startup
@@ -1037,7 +1037,7 @@ commands in the Help buffer using the `?' speed command."
      :last-refile "org-refile-last-stored"
      :last-capture-marker "org-capture-last-stored-marker")
    "Names for bookmarks automatically set by some Org commands.
-This can provide strings as names for a number of bookmakrs Org sets
+This can provide strings as names for a number of bookmarks Org sets
 automatically.  The following keys are currently implemented:
   :last-capture
   :last-capture-marker
@@ -19542,7 +19542,7 @@ COMMANDS is a list of alternating OLDDEF NEWDEF command names."
   "Transpose words for Org.
 This uses the `org-mode-transpose-word-syntax-table' syntax
 table, which interprets characters in `org-emphasis-alist' as
-word constituants."
+word constituents."
   (interactive)
   (with-syntax-table org-mode-transpose-word-syntax-table
     (call-interactively 'transpose-words)))
@@ -20401,7 +20401,7 @@ If `org-special-ctrl-o' is nil, just call `open-line' everywhere."
     (open-line n))
    ((org-at-table-p)
     (org-table-insert-row))
-   (t    
+   (t
     (open-line n))))
 
 (defun org-return (&optional indent)
@@ -21148,7 +21148,7 @@ With prefix arg UNCOMPILED, load the uncompiled versions."
         (message "The following feature%s found in load-path, please check if that's correct:\n%s"
                  (if (> (length load-uncore) 1) "s were" " was") load-uncore))
     (if load-misses
-        (message "Some error occured while reloading Org feature%s\n%s\nPlease check *Messages*!\n%s"
+        (message "Some error occurred while reloading Org feature%s\n%s\nPlease check *Messages*!\n%s"
                  (if (> (length load-misses) 1) "s" "") load-misses (org-version nil 'full))
       (message "Successfully reloaded Org\n%s" (org-version nil 'full)))))
 
diff --git a/lisp/org/ox-ascii.el b/lisp/org/ox-ascii.el
index 430bc6e618b..5b41d2d3989 100644
--- a/lisp/org/ox-ascii.el
+++ b/lisp/org/ox-ascii.el
@@ -489,7 +489,7 @@ Empty lines are not indented."
 
 (defun org-ascii--box-string (s info)
   "Return string S with a partial box to its left.
-INFO is a plist used as a communicaton channel."
+INFO is a plist used as a communication channel."
   (let ((utf8p (eq (plist-get info :ascii-charset) 'utf-8)))
     (format (if utf8p "╭────\n%s\n╰────" ",----\n%s\n`----")
             (replace-regexp-in-string
@@ -710,7 +710,7 @@ generation.  INFO is a plist used as a communication channel."
      (let ((text-width
             (if keyword (org-ascii--current-text-width keyword info)
               (- org-ascii-text-width org-ascii-global-margin)))
-           ;; Use a counter instead of retreiving ordinal of each
+           ;; Use a counter instead of retrieving ordinal of each
            ;; src-block.
            (count 0))
        (mapconcat
@@ -748,7 +748,7 @@ generation.  INFO is a plist used as a communication channel."
      (let ((text-width
             (if keyword (org-ascii--current-text-width keyword info)
               (- org-ascii-text-width org-ascii-global-margin)))
-           ;; Use a counter instead of retreiving ordinal of each
+           ;; Use a counter instead of retrieving ordinal of each
            ;; src-block.
            (count 0))
        (mapconcat
diff --git a/lisp/org/ox-html.el b/lisp/org/ox-html.el
index 5aeaaf7bccf..b4094d3e44c 100644
--- a/lisp/org/ox-html.el
+++ b/lisp/org/ox-html.el
@@ -153,7 +153,7 @@
 \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">")
     ("xhtml-transitional" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\"
 \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">")
-    ("xhtml-framset" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\"
+    ("xhtml-frameset" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\"
 \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">")
     ("xhtml-11" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.1//EN\"
 \"http://www.w3.org/TR/xhtml1/DTD/xhtml11.dtd\">")
@@ -3069,7 +3069,7 @@ CONTENTS is the contents of the object.  INFO is a plist holding
 contextual information."
   (format "<sup>%s</sup>" contents))
 
-;;;; Tabel Cell
+;;;; Table Cell
 
 (defun org-html-table-cell (table-cell contents info)
   "Transcode a TABLE-CELL element from Org to HTML.
diff --git a/lisp/org/ox-latex.el b/lisp/org/ox-latex.el
index 4dc0fd07376..6766b8583f1 100644
--- a/lisp/org/ox-latex.el
+++ b/lisp/org/ox-latex.el
@@ -1325,13 +1325,13 @@ holding contextual information."
     (let* ((class (plist-get info :latex-class))
            (level (org-export-get-relative-level headline info))
            (numberedp (org-export-numbered-headline-p headline info))
-           (class-sectionning (assoc class org-latex-classes))
+           (class-sectioning (assoc class org-latex-classes))
            ;; Section formatting will set two placeholders: one for
            ;; the title and the other for the contents.
            (section-fmt
-            (let ((sec (if (functionp (nth 2 class-sectionning))
-                           (funcall (nth 2 class-sectionning) level numberedp)
-                         (nth (1+ level) class-sectionning))))
+            (let ((sec (if (functionp (nth 2 class-sectioning))
+                           (funcall (nth 2 class-sectioning) level numberedp)
+                         (nth (1+ level) class-sectioning))))
               (cond
                ;; No section available for that LEVEL.
                ((not sec) nil)
@@ -1622,7 +1622,7 @@ CONTENTS is nil.  INFO is a plist holding contextual information."
           (value (org-remove-indentation
                   (org-element-property :value latex-environment))))
       (if (not (org-string-nw-p label)) value
-        ;; Environment is labelled: label must be within the environment
+        ;; Environment is labeled: label must be within the environment
         ;; (otherwise, a reference pointing to that element will count
         ;; the section instead).
         (with-temp-buffer
diff --git a/lisp/org/ox-md.el b/lisp/org/ox-md.el
index 811c4e5805e..78420170b8a 100644
--- a/lisp/org/ox-md.el
+++ b/lisp/org/ox-md.el
@@ -22,7 +22,7 @@
 
 ;;; Commentary:
 
-;; This library implements a Markdown back-end (vanilla flavour) for
+;; This library implements a Markdown back-end (vanilla flavor) for
 ;; Org exporter, based on `html' back-end.  See Org manual for more
 ;; information.
 
diff --git a/lisp/org/ox-odt.el b/lisp/org/ox-odt.el
index eb7856b296a..d5d03e49b50 100644
--- a/lisp/org/ox-odt.el
+++ b/lisp/org/ox-odt.el
@@ -596,7 +596,7 @@ INPUT-FMT-LIST in to a single class.
 Note that this variable inherently captures how LibreOffice based
 converters work.  LibreOffice maps documents of various formats
 to classes like Text, Web, Spreadsheet, Presentation etc and
-allow document of a given class (irrespective of it's source
+allow document of a given class (irrespective of its source
 format) to be converted to any of the export formats associated
 with that class.
 
@@ -919,7 +919,7 @@ Specifically, locale-dependent specifiers like \"%c\", \"%x\" are
 formatted as canonical Org timestamps.  For finer control, avoid
 these %-specifiers.
 
-Textutal specifiers like \"%b\", \"%h\", \"%B\", \"%a\", \"%A\"
+Textual specifiers like \"%b\", \"%h\", \"%B\", \"%a\", \"%A\"
 etc., are displayed by the application in the default language
 and country specified in `org-odt-styles-file'.  Note that the
 default styles file uses language \"en\" and country \"GB\".  You
@@ -1436,7 +1436,7 @@ original parsed data.  INFO is a plist holding export options."
   ;; Update content.xml.
 
   (let* ( ;; `org-display-custom-times' should be accessed right
-         ;; within the context of the Org buffer.  So obtain it's
+         ;; within the context of the Org buffer.  So obtain its
          ;; value before moving on to temp-buffer context down below.
          (custom-time-fmts
           (if org-display-custom-times
@@ -1721,7 +1721,7 @@ CONTENTS is nil.  INFO is a plist holding contextual information."
        (and (eq (org-element-type prev) 'footnote-reference)
             (format "<text:span text:style-name=\"%s\">%s</text:span>"
                     "OrgSuperscript" ",")))
-     ;; Trancode footnote reference.
+     ;; Transcode footnote reference.
      (let ((n (org-export-get-footnote-number footnote-reference info)))
        (cond
         ((not (org-export-footnote-first-reference-p footnote-reference info))
@@ -2195,7 +2195,7 @@ SHORT-CAPTION are strings."
                (concat
                 ;; Sneak in a bookmark.  The bookmark is used when the
                 ;; labeled element is referenced with a link that
-                ;; provides it's own description.
+                ;; provides its own description.
                 (format "\n<text:bookmark text:name=\"%s\"/>" label)
                 ;; Label definition: Typically formatted as below:
                 ;;     CATEGORY SEQ-NO: LONG CAPTION
@@ -2342,7 +2342,6 @@ used as a communication channel."
          (user-frame-params
           (list user-frame-style user-frame-attrs user-frame-anchor))
          ;; (embed-as (or embed-as user-frame-anchor "paragraph"))
-         ;; extrac
          ;;
          ;; Handle `:width', `:height' and `:scale' properties.  Read
          ;; them as numbers since we need them for computations.
@@ -2372,7 +2371,7 @@ used as a communication channel."
          (title (and replaces (capitalize
                                (symbol-name (org-element-type replaces)))))
 
-         ;; If yes, note down it's contents.  It will go in to frame
+         ;; If yes, note down its contents.  It will go in to frame
          ;; description.  This quite useful for debugging.
          (desc (and replaces (org-element-property :value replaces))))
     (org-odt--render-image/formula entity href width height
@@ -2410,7 +2409,7 @@ used as a communication channel."
          (title (and replaces (capitalize
                                (symbol-name (org-element-type replaces)))))
 
-         ;; If yes, note down it's contents.  It will go in to frame
+         ;; If yes, note down its contents.  It will go in to frame
          ;; description.  This quite useful for debugging.
          (desc (and replaces (org-element-property :value replaces)))
          width height)
@@ -2614,12 +2613,12 @@ used as a communication channel."
 INFO is a plist holding contextual information.
 
 Return non-nil, if ELEMENT is of type paragraph satisfying
-PARAGRAPH-PREDICATE and it's sole content, save for whitespaces,
+PARAGRAPH-PREDICATE and its sole content, save for whitespaces,
 is a link that satisfies LINK-PREDICATE.
 
 Return non-nil, if ELEMENT is of type link satisfying
-LINK-PREDICATE and it's containing paragraph satisfies
-PARAGRAPH-PREDICATE inaddtion to having no other content save for
+LINK-PREDICATE and its containing paragraph satisfies
+PARAGRAPH-PREDICATE in addition to having no other content save for
 leading and trailing whitespaces.
 
 Return nil, otherwise."
@@ -2708,7 +2707,7 @@ Return nil, otherwise."
                                             (concat (number-to-string n) ".")))
                               item-numbers "")))))
      ;; Case 2: Locate a regular and numbered headline in the
-     ;; hierarchy.  Display it's section number.
+     ;; hierarchy.  Display its section number.
      (let ((headline (loop for el in (cons destination genealogy)
                            when (and (eq (org-element-type el) 'headline)
                                      (not (org-export-low-level-p el info))
@@ -2721,7 +2720,7 @@ Return nil, otherwise."
                  (mapconcat 'number-to-string (org-export-get-headline-number
                                                headline info) "."))))
      ;; Case 4: Locate a regular headline in the hierarchy.  Display
-     ;; it's title.
+     ;; its title.
      (let ((headline (loop for el in (cons destination genealogy)
                            when (and (eq (org-element-type el) 'headline)
                                      (not (org-export-low-level-p el info)))
@@ -3101,9 +3100,9 @@ holding contextual information."
 
 (defun org-odt-hfy-face-to-css (fn)
   "Create custom style for face FN.
-When FN is the default face, use it's foreground and background
+When FN is the default face, use its foreground and background
 properties to create \"OrgSrcBlock\" paragraph style.  Otherwise
-use it's color attribute to create a character style whose name
+use its color attribute to create a character style whose name
 is obtained from FN.  Currently all attributes of FN other than
 color are ignored.
 
diff --git a/lisp/org/ox-texinfo.el b/lisp/org/ox-texinfo.el
index dcc9b790763..0126170ec82 100644
--- a/lisp/org/ox-texinfo.el
+++ b/lisp/org/ox-texinfo.el
@@ -963,7 +963,7 @@ holding contextual information."
   (let* ((class (plist-get info :texinfo-class))
          (level (org-export-get-relative-level headline info))
          (numberedp (org-export-numbered-headline-p headline info))
-         (class-sectionning (assoc class org-texinfo-classes))
+         (class-sectioning (assoc class org-texinfo-classes))
          ;; Find the index type, if any
          (index (org-element-property :INDEX headline))
          ;; Check if it is an appendix
@@ -999,10 +999,10 @@ holding contextual information."
          ;; Section formatting will set two placeholders: one for the
          ;; title and the other for the contents.
          (section-fmt
-          (let ((sec (if (and (symbolp (nth 2 class-sectionning))
-                              (fboundp (nth 2 class-sectionning)))
-                         (funcall (nth 2 class-sectionning) level numberedp)
-                       (nth (1+ level) class-sectionning))))
+          (let ((sec (if (and (symbolp (nth 2 class-sectioning))
+                              (fboundp (nth 2 class-sectioning)))
+                         (funcall (nth 2 class-sectioning) level numberedp)
+                       (nth (1+ level) class-sectioning))))
             (cond
              ;; No section available for that LEVEL.
              ((not sec) nil)
diff --git a/lisp/org/ox.el b/lisp/org/ox.el
index 69dca685464..6b88f1a908b 100644
--- a/lisp/org/ox.el
+++ b/lisp/org/ox.el
@@ -2862,7 +2862,7 @@ The copy will preserve local variables, visibility, contents and
 narrowing of the original buffer.  If a region was active in
 BUFFER, contents will be narrowed to that region instead.
 
-The resulting function can be evaled at a later time, from
+The resulting function can be evaluated at a later time, from
 another buffer, effectively cloning the original buffer there.
 
 The function assumes BUFFER's major mode is `org-mode'."
@@ -4674,7 +4674,7 @@ INFO is a plist used as a communication channel."
   "Return TABLE-ROW number.
 INFO is a plist used as a communication channel.  Return value is
 zero-based and ignores separators.  The function returns nil for
-special colums and separators."
+special columns and separators."
   (when (and (eq (org-element-property :type table-row) 'standard)
              (not (org-export-table-row-is-special-p table-row info)))
     (let ((number 0))
@@ -5866,7 +5866,7 @@ files or buffers, only the display.
   "Export dispatcher for Org mode.
 
 It provides an access to common export related tasks in a buffer.
-Its interface comes in two flavours: standard and expert.
+Its interface comes in two flavors: standard and expert.
 
 While both share the same set of bindings, only the former
 displays the valid keys associations in a dedicated buffer.
@@ -5874,7 +5874,7 @@ Scrolling (resp. line-wise motion) in this buffer is done with
 SPC and DEL (resp. C-n and C-p) keys.
 
 Set variable `org-export-dispatch-use-expert-ui' to switch to one
-flavour or the other.
+flavor or the other.
 
 When ARG is \\[universal-argument], repeat the last export action, with the same set
 of options used back then, on the current buffer.