Spelling fixes.

2 files changed, 2 insertions, 2 deletions

diff --git a/lisp/files.el b/lisp/files.el
index ce032534f04..238be36cae0 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4183,7 +4183,7 @@ Checks for files in `temporary-file-directory',
 `small-temporary-file-directory', and /tmp."
   (let ((temporary-file-directory temporary-file-directory)
         caseless)
-    ;; On MS-Windows, file-truename will convert short 8+3 alises to
+    ;; On MS-Windows, file-truename will convert short 8+3 aliases to
     ;; their long file-name equivalents, so compare-strings does TRT.
     (if (memq system-type '(ms-dos windows-nt))
         (setq temporary-file-directory (file-truename temporary-file-directory)
diff --git a/test/automated/add-log-tests.el b/test/automated/add-log-tests.el
index 28029e18b99..f6e803cd317 100644
--- a/test/automated/add-log-tests.el
+++ b/test/automated/add-log-tests.el
@@ -73,7 +73,7 @@ function foo()
 
 (add-log-current-defun-deftest
  sh-var
- "Test sh-current-defun-name can find variabe definition."
+ "Test sh-current-defun-name can find variable definition."
  sh-mode "
 PATH=a:/ab:/usr/abc
 DIR=/pr><oc"