[nongnu] elpa/haskell-mode 952af0ed21 12/24: typos

[ELPA Syncer]

branch: elpa/haskell-mode
commit 952af0ed210e7e31cefe7a37b6310cf7d99e9b15
Author: Eric Lindblad <askeblad@outlook.com>
Commit: Eric Lindblad <askeblad@outlook.com>

    typos
---
 haskell-c2hs.el                  | 2 +-
 haskell-completions.el           | 4 ++--
 haskell-decl-scan.el             | 2 +-
 haskell-font-lock.el             | 2 +-
 haskell-indent.el                | 4 ++--
 haskell-indentation.el           | 4 ++--
 haskell-mode.el                  | 2 +-
 haskell-utils.el                 | 2 +-
 tests/haskell-font-lock-tests.el | 4 ++--
 9 files changed, 13 insertions(+), 13 deletions(-)

diff --git a/haskell-c2hs.el b/haskell-c2hs.el
index c4cb41ec37..8eb31ff8f6 100644
--- a/haskell-c2hs.el
+++ b/haskell-c2hs.el
@@ -111,7 +111,7 @@
                        (opt (+ ,ws)
                             (group-n 3
                                      "as")))
-                  ;; TODO: fun hook highlighting is incompelete
+                  ;; TODO: fun hook highlighting is incomplete
                   (seq (group-n 2
                                 (or "call"
                                     "fun")
diff --git a/haskell-completions.el b/haskell-completions.el
index bff641a502..8585b14bac 100644
--- a/haskell-completions.el
+++ b/haskell-completions.el
@@ -31,7 +31,7 @@
 ;;
 ;; For major use function `haskell-completions-grab-prefix' is supposed, and
 ;; other prefix grabbing functions are used internally by it.  So, only this
-;; funciton have prefix minimal length functionality and invokes predicate
+;; function have prefix minimal length functionality and invokes predicate
 ;; function `haskell-completions-can-grab-prefix'.
 
 ;;; Code:
@@ -226,7 +226,7 @@ identifier at point depending on result of function
              (type 'haskell-completions-identifier-prefix)
              (case-fold-search nil)
              value)
-        ;; we need end position of result, becase of
+        ;; we need end position of result, because of
         ;; `haskell-ident-pos-at-point' ignores trailing whitespace, e.g. the
         ;; result will be same for `map|` and `map  |` invocations.
         (when (<= p end)
diff --git a/haskell-decl-scan.el b/haskell-decl-scan.el
index 85e6ff25ca..2f4ddff2a1 100644
--- a/haskell-decl-scan.el
+++ b/haskell-decl-scan.el
@@ -513,7 +513,7 @@ positions and the type is one of the symbols \"variable\", 
\"datatype\",
                             (skip-chars-backward " \t")
                             (point))))))
           ;; If we did not manage to extract a name, cancel this
-          ;; declaration (eg. when line ends in "=> ").
+          ;; declaration (e.g. when line ends in "=> ").
           (if (string-match "^[ \t]*$" name) (setq name nil))
           (setq type 'instance)))
         ;; Move past start of current declaration.
diff --git a/haskell-font-lock.el b/haskell-font-lock.el
index a0eb9ce967..52ef62533e 100644
--- a/haskell-font-lock.el
+++ b/haskell-font-lock.el
@@ -161,7 +161,7 @@ font faces assigned as if respective mode was enabled."
 
 ;; This used to be `font-lock-variable-name-face' but it doesn't result in
 ;; a highlighting that's consistent with other modes (it's mostly used
-;; for function defintions).
+;; for function definitions).
 (defface haskell-definition-face
   '((t :inherit font-lock-function-name-face))
   "Face used to highlight Haskell definitions."
diff --git a/haskell-indent.el b/haskell-indent.el
index 54e1d12833..7a1a2b0606 100644
--- a/haskell-indent.el
+++ b/haskell-indent.el
@@ -1232,7 +1232,7 @@ START if non-nil is a presumed start pos of the current 
definition."
                    (setq open (haskell-indent-offset-after-info)))
           (list (list (haskell-indent-after-keyword-column open start))))))
 
-     ;; open structure? ie  ( { [
+     ;; open structure? i.e.  ( { [
      ((setq open (haskell-indent-open-structure start (point)))
       (haskell-indent-inside-paren open))
 
@@ -1434,7 +1434,7 @@ TYPE is either 'guard or 'rhs."
 
 (defun haskell-indent-align-guards-and-rhs (_start _end)
   "Align the guards and rhs of functions in the region, which must be active."
-  ;; The `start' and `end' args are dummys right now: they're just there so
+  ;; The `start' and `end' args are dummies right now: they're just there so
   ;; we can use the "r" interactive spec which properly signals an error.
   (interactive "*r")
   (haskell-indent-align-def t 'guard)
diff --git a/haskell-indentation.el b/haskell-indentation.el
index cdc66f9576..091cef7d81 100644
--- a/haskell-indentation.el
+++ b/haskell-indentation.el
@@ -241,9 +241,9 @@ indentation points to the right, we switch going to the 
left."
   ;; try to repeat
   (when (not (haskell-indentation-indent-line-repeat))
     (setq haskell-indentation-dyn-last-direction nil)
-    ;; parse error is intentionally not cought here, it may come from
+    ;; parse error is intentionally not caught here, it may come from
     ;; `haskell-indentation-find-indentations', but escapes the scope
-    ;; and aborts the opertaion before any moving happens
+    ;; and aborts the operation before any moving happens
     (let* ((cc (current-column))
            (ci (haskell-indentation-current-indentation))
            (inds (save-excursion
diff --git a/haskell-mode.el b/haskell-mode.el
index 21cf4d282b..92bfd71cb1 100644
--- a/haskell-mode.el
+++ b/haskell-mode.el
@@ -531,7 +531,7 @@ be set to the preferred literate style."
       (when (nth 4 ppss)
         ;; go to the end of a comment, there is nothing to see inside
         ;; a comment so we might as well just skip over it
-        ;; immediatelly
+        ;; immediately
         (setq ppss (parse-partial-sexp (point) (point-max) nil nil ppss
                                        'syntax-table)))
       (when (nth 8 ppss)
diff --git a/haskell-utils.el b/haskell-utils.el
index 1f1620e2b1..474da616f3 100644
--- a/haskell-utils.el
+++ b/haskell-utils.el
@@ -122,7 +122,7 @@ Returns one of the following symbols:
 + interactive-error
 + no-error
 
-*Warning*: this funciton covers only three kind of responses:
+*Warning*: this function covers only three kind of responses:
 
 * \"unknown command …\"
   REPL missing requested command
diff --git a/tests/haskell-font-lock-tests.el b/tests/haskell-font-lock-tests.el
index 836cdcf1a0..a0f4836245 100644
--- a/tests/haskell-font-lock-tests.el
+++ b/tests/haskell-font-lock-tests.el
@@ -129,7 +129,7 @@
 
 (ert-deftest haskell-syntactic-test-18a-multiline ()
   "Backtick operators multiline"
-  ;; strangely thins works in interactive session
+  ;; strangely this works in interactive session
   :expected-result :failed
   (check-properties
    '(" `"
@@ -143,7 +143,7 @@
   "Syntax for hierarchical modules when on the first line."
   ;; note that quite many things here are not consistent but for now
   ;; this test describes what it is. When on the first column
-  ;; font-lock thins we are defining (.) operator. Not good.
+  ;; font-lock thinks we are defining (.) operator. Not good.
   :expected-result :failed
   (check-properties
    '("A1.B.C"