Skip to content

Commit 9757590

Browse files
committed
Fix indentation in all .el files
No semantic change.
1 parent eabfef5 commit 9757590

14 files changed

+409
-409
lines changed

haskell-cabal.el

+6-6
Original file line numberDiff line numberDiff line change
@@ -231,12 +231,12 @@ OTHER-WINDOW use `find-file-other-window'."
231231
;; in pathological cases, can have a different .cabal file
232232
;; associated with the current buffer)
233233
(if buffer-file-name
234-
(let ((cabal-file (haskell-cabal-find-file (file-name-directory buffer-file-name))))
235-
(if cabal-file
236-
(if other-window
237-
(find-file-other-window cabal-file)
238-
(find-file cabal-file))
239-
(error "Could not locate \".cabal\" file for %S" buffer-file-name)))
234+
(let ((cabal-file (haskell-cabal-find-file (file-name-directory buffer-file-name))))
235+
(if cabal-file
236+
(if other-window
237+
(find-file-other-window cabal-file)
238+
(find-file cabal-file))
239+
(error "Could not locate \".cabal\" file for %S" buffer-file-name)))
240240
(error "Cannot locate \".cabal\" file for buffers not visiting any file")))
241241

242242
(defvar haskell-cabal-commands

haskell-compat.el

+2-2
Original file line numberDiff line numberDiff line change
@@ -28,8 +28,8 @@
2828
"Returns non-nil if PROCESS is alive.
2929
A process is considered alive if its status is `run', `open',
3030
`listen', `connect' or `stop'."
31-
(memq (process-status process)
32-
'(run open listen connect stop))))
31+
(memq (process-status process)
32+
'(run open listen connect stop))))
3333

3434
(provide 'haskell-compat)
3535

haskell-compile.el

+1-1
Original file line numberDiff line numberDiff line change
@@ -112,7 +112,7 @@ See Info node `(haskell-mode)compilation' for more details."
112112

113113
(add-hook 'compilation-filter-hook
114114
'haskell-compilation-filter-hook nil t)
115-
)
115+
)
116116

117117
;;;###autoload
118118
(defun haskell-compile (&optional edit-command)

haskell-decl-scan.el

+1-1
Original file line numberDiff line numberDiff line change
@@ -197,7 +197,7 @@ current line that starts with REGEXP and is not in `font-lock-comment-face'."
197197
(let (p)
198198
(loop
199199
do (setq p (point))
200-
(haskell-ds-move-to-start-regexp inc regexp)
200+
(haskell-ds-move-to-start-regexp inc regexp)
201201
while (and (nth 4 (syntax-ppss))
202202
(/= p (point))))))
203203

0 commit comments

Comments
 (0)