@@ -434,7 +434,7 @@ Returns the location of the start of the comment, nil otherwise."
434434(defun purescript-indent-next-symbol-safe (end )
435435 " Puts point to the next following symbol, or to end if there are no more
436436symbols in the sexp."
437- (condition-case errlist (purescript-indent-next-symbol end)
437+ (condition-case nil (purescript-indent-next-symbol end)
438438 (error (goto-char end))))
439439
440440(defun purescript-indent-separate-valdef (start end )
@@ -1292,7 +1292,7 @@ We stay in the cycle as long as the TAB key is pressed."
12921292 (if marker
12931293 (goto-char (marker-position marker)))))))
12941294
1295- (defun purescript-indent-region (start end )
1295+ (defun purescript-indent-region (_start _end )
12961296 (error " Auto-reindentation of a region is not supported " ))
12971297
12981298; ;; alignment functions
@@ -1430,9 +1430,9 @@ TYPE is either \\='guard or \\='rpurs."
14301430 (if regstack
14311431 (purescript-indent-shift-columns maxcol regstack)))))))
14321432
1433- (defun purescript-indent-align-guards-and-rpurs (start end )
1433+ (defun purescript-indent-align-guards-and-rpurs (_start _end )
14341434 " Align the guards and rpurs of functions in the region, which must be active."
1435- ; ; The `start ' and `end ' args are dummys right now: they're just there so
1435+ ; ; The `_start ' and `_end ' args are dummys right now: they're just there so
14361436 ; ; we can use the "r" interactive spec which properly signals an error.
14371437 (interactive " *r" )
14381438 (purescript-indent-align-def t 'guard )
0 commit comments