; Spelling fixes

3 files changed, 4 insertions, 4 deletions

diff --git a/lisp/org/ob-sql.el b/lisp/org/ob-sql.el
index 9250825d4e5..1b1d2dc09d3 100644
--- a/lisp/org/ob-sql.el
+++ b/lisp/org/ob-sql.el
@@ -127,7 +127,7 @@ SQL Server on Windows and Linux platform."
              " "))
 
 (defun org-babel-sql-dbstring-sqsh (host user password database)
-  "Make sqsh commmand line args for database connection.
+  "Make sqsh command line args for database connection.
 \"sqsh\" is one method to access Sybase or MS SQL via Linux platform"
   (mapconcat #'identity
              (delq nil
diff --git a/lisp/org/org-datetree.el b/lisp/org/org-datetree.el
index 308f42ff6cf..6d1926bc15e 100644
--- a/lisp/org/org-datetree.el
+++ b/lisp/org/org-datetree.el
@@ -54,7 +54,7 @@ Added time stamp is active unless value is `inactive'."
   "Find or create an entry for date D.
 If KEEP-RESTRICTION is non-nil, do not widen the buffer.
 When it is nil, the buffer will be widened to make sure an existing date
-tree can be found.  If it is the sympol `subtree-at-point', then the tree
+tree can be found.  If it is the symbol `subtree-at-point', then the tree
 will be built under the headline at point."
   (setq-local org-datetree-base-level 1)
   (save-restriction
@@ -94,7 +94,7 @@ will be built under the headline at point."
 Compared to `org-datetree-find-date-create' this function creates
 entries ordered by week instead of months.
 When it is nil, the buffer will be widened to make sure an existing date
-tree can be found.  If it is the sympol `subtree-at-point', then the tree
+tree can be found.  If it is the symbol `subtree-at-point', then the tree
 will be built under the headline at point."
   (setq-local org-datetree-base-level 1)
   (save-restriction
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el
index ae437908643..66907e2cd9c 100644
--- a/lisp/org/org-table.el
+++ b/lisp/org/org-table.el
@@ -5131,7 +5131,7 @@ information."
              (column
               ;; Call costly `org-export-table-cell-address' only if
               ;; absolutely necessary, i.e., if one
-              ;; of :fmt :efmt :hmft has a "plist type" value.
+              ;; of :fmt :efmt :hfmt has a "plist type" value.
               ,(and (cl-some (lambda (v) (integerp (car-safe v)))
                              (list efmt hfmt fmt))
                     '(1+ (cdr (org-export-table-cell-address cell info))))))