4 files changed, 6 insertions, 6 deletions

diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index b1a8a4b9fdb..6279ed3df0d 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -2125,7 +2125,7 @@ the currently selected interval size."
   "Write out a clock table at position IPOS in the current buffer.
 TABLES is a list of tables with clocking data as produced by
 `org-clock-get-table-data'.  PARAMS is the parameter property list obtained
-from the dynamic block defintion."
+from the dynamic block definition."
   ;; This function looks quite complicated, mainly because there are a
   ;; lot of options which can add or remove columns.  I have massively
   ;; commented this function, the I hope it is understandable.  If
diff --git a/lisp/org/org-compat.el b/lisp/org/org-compat.el
index 896acc5aeae..5e4935caa7e 100644
--- a/lisp/org/org-compat.el
+++ b/lisp/org/org-compat.el
@@ -272,7 +272,7 @@ Works on both Emacs and XEmacs."
     nil))
 
 (defmacro org-xemacs-without-invisibility (&rest body)
-  "Turn off exents with invisibility while executing BODY."
+  "Turn off extents with invisibility while executing BODY."
   `(let ((ext-inv (extent-list nil (point-at-bol) (point-at-eol)
                                'all-extents-closed-open 'invisible))
          ext-inv-specs)
diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el
index 14b3e12c888..1a14c71d510 100644
--- a/lisp/org/org-list.el
+++ b/lisp/org/org-list.el
@@ -681,7 +681,7 @@ Assume point is at an item."
               (cond
                ((<= (point) lim-up)
                 ;; At upward limit: if we ended at an item, store it,
-                ;; else dimiss useless data recorded above BEG-CELL.
+                ;; else dismiss useless data recorded above BEG-CELL.
                 ;; Jump to part 2.
                 (throw 'exit
                        (setq itm-lst
diff --git a/lisp/org/org.el b/lisp/org/org.el
index 5d988b3cecd..f88ed3c7ebc 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -1482,7 +1482,7 @@ in the search text."
   :type '(choice
           (const :tag "Use fuzy text search" nil)
           (const :tag "Match only exact headline" t)
-          (const :tag "Match extact headline or query to create it"
+          (const :tag "Match exact headline or query to create it"
                  query-to-create)))
 
 (defcustom org-link-frame-setup
@@ -5052,7 +5052,7 @@ The time stamps may be either active or inactive.")
 (defvar org-emph-face nil)
 
 (defun org-do-emphasis-faces (limit)
-  "Run through the buffer and add overlays to emphasised strings."
+  "Run through the buffer and add overlays to emphasized strings."
   (let (rtn a)
     (while (and (not rtn) (re-search-forward org-emph-re limit t))
       (if (not (= (char-after (match-beginning 3))
@@ -14835,7 +14835,7 @@ user."
       (setq ans (replace-match (format "%04d-%02d-%02d\\5" year month day)
                                t nil ans)))
 
-    ;; Help matching dottet european dates
+    ;; Help matching dotted european dates
     (when (string-match
            "^ *\\(3[01]\\|0?[1-9]\\|[12][0-9]\\)\\. ?\\(0?[1-9]\\|1[012]\\)\\. ?\\([1-9][0-9][0-9][0-9]\\)?" ans)
       (setq year (if (match-end 3)