aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMattias EngdegÄrd2019-08-06 13:09:20 +0200
committerMattias EngdegÄrd2019-08-08 12:10:36 +0200
commitd1ec33eaead82138ba5e65d59fd68c7da6d9e3a5 (patch)
tree0a0aab1b94f59d93a0b19a4801024f84630f7108
parentf09dc0b81c23046c17574c2ef8d614907455f622 (diff)
downloademacs-d1ec33eaead82138ba5e65d59fd68c7da6d9e3a5.tar.gz
emacs-d1ec33eaead82138ba5e65d59fd68c7da6d9e3a5.zip
Suppress relint errors in fortran.el
* lisp/progmodes/fortran.el (fortran-indent-to-column): Suppress relint complaints about duplicated character in skip-set; it's intentional and harmless.
-rw-r--r--lisp/progmodes/fortran.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index f01e866f557..ff7b408c204 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1820,7 +1820,9 @@ notes: 1) A non-zero/non-blank character in column 5 indicates a continuation
1820 fortran-comment-indent-char)) 1820 fortran-comment-indent-char))
1821 (chars (string ?\s ?\t char))) 1821 (chars (string ?\s ?\t char)))
1822 (goto-char (match-end 0)) 1822 (goto-char (match-end 0))
1823 ;; relint suppression: Duplicated character
1823 (skip-chars-backward chars) 1824 (skip-chars-backward chars)
1825 ;; relint suppression: Duplicated character
1824 (delete-region (point) (progn (skip-chars-forward chars) 1826 (delete-region (point) (progn (skip-chars-forward chars)
1825 (point))) 1827 (point)))
1826 (insert-char char (- col (current-column))))) 1828 (insert-char char (- col (current-column)))))