        ;; the matching "let" or "loop" column.
        (save-excursion
          (and (futhark-backward-part)
-              (looking-at "\\<in$")
+              (looking-at "\\<in[[:space:]]*$")
               (futhark-find-closest-of-keywords-backward '("let" "loop"))
               (current-column)))
 

       ;; the matching "fn" column plus one indent level.
       (save-excursion
         (and (futhark-backward-part)
              (looking-at "=>$")
              (futhark-find-keyword-backward "fn")
              (+ (current-column) futhark-indent-level)))


       ;; "else", align to the starting column plus one indent level.
       (save-excursion
         (and (futhark-backward-part)
              (or (looking-at "\\<then[[:space:]]*$")
                  (looking-at "\\<else[[:space:]]*$"))
              (progn (futhark-beginning-of-line-text) t)
              (+ (current-column) futhark-indent-level)))

