Spelling fixes

4 files changed, 4 insertions, 4 deletions

diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index a7d833cb151..e7fcf223bc1 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -6159,7 +6159,7 @@ Return >0 for nested struct."
                 (or (equal (char-before) ?\{) ;; empty case
                     (equal (char-before) ?\;)
                     (equal (char-before) ?\}))
-                    ;; skip what looks like bus repitition operator {#{
+                    ;; skip what looks like bus repetition operator {#{
                     (not (string-match "^{\\s-*[0-9]+\\s-*{" (buffer-substring p (point)))))))))
       (progn
         (let ( (pt (point)) (pass 0))
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index 7e4bc13bd80..54496b9e631 100644
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -1015,7 +1015,7 @@ specific headers."
    "\n"))
 
 (defun vc-dir-refresh-files (files)
-  "Refresh some fies in the *VC-dir* buffer."
+  "Refresh some files in the *VC-dir* buffer."
   (let ((def-dir default-directory)
         (backend vc-dir-backend))
     (vc-set-mode-line-busy-indicator)
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 07a3394ad94..b8be3ff7df2 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -592,7 +592,7 @@
 ;;
 ;;   The vc-keep-workfiles configuration variable is gone.  Used only by
 ;;   the RCS and SCCS backends, it was an invitation to shoot self in foot
-;;   when set to the (non-default) value nil.  The original justication
+;;   when set to the (non-default) value nil.  The original justification
 ;;   for it (saving disk space) is long obsolete.
 ;;
 ;; - The rollback method (implemented by RCS and SCCS only) is gone. See
diff --git a/src/gnutls.c b/src/gnutls.c
index 4e12d88ab82..ad4d9974ed7 100644
--- a/src/gnutls.c
+++ b/src/gnutls.c
@@ -1065,7 +1065,7 @@ The return value is a property list with top-level keys :warnings and
                     build_string (fn_gnutls_protocol_get_name
                                   (fn_gnutls_protocol_get_version (state)))));
 
-  /* Cipler name. */
+  /* Cipher name. */
   result = nconc2
     (result, list2 (intern (":cipher"),
                     build_string (fn_gnutls_cipher_get_name