Emacs 中的 Scala 模式缩进

Question

在 Emacs 中编写 Scala 代码时，我注意到以下缩进问题：

List(1,2,3).foreach{ x =>

然后按 Enter。

然后关闭括号，这就是最终发生的情况：

List(1,2,3).foreach{ x =>
                  }

虽然这是一个特定的示例，但在 Emacs 中自动缩进时，此问题会以多种方式出现。

回答这两个问题中的任何一个，我们将不胜感激：

1. 如何解决此问题，以便将大括号放在正确的位置，并且大括号内的任何内容都向右缩进一层？

2. 是否可以禁用这种类型的自动缩进（即像 vi 中的“set noautoindent”）。我尝试了像这里建议的解决方案： Disable auto indent global in Emacs without成功。

提前致谢！

Answer 1

我编写了一段简单的代码 - 它使 emacs 在大多数情况下保持缩进级别，并在前一个非空行以“{”、“(”、“>”结束时向右缩进两个空格， 同时添加

将文件 besi.el 添加到您的加载路径。

(provide 'besi)

(defun besi-indent-line ()
  "Indent current line"
  (interactive)
  (scala-indent-line-to (besi-indent)))

(defun besi-indent ()
  (save-excursion
    (forward-comment -100000)
    (backward-char 1)
    (if (or (looking-at "{") (looking-at "=") (looking-at ">") (looking-at "("))
      (+ (current-indentation) 2)
      (current-indentation))))

(defun besi-newline ()
  (interactive)
  (newline-and-indent))

编辑 scala-mode.el 中的行

indent-line-function          'besi-indent-line

和 scala-mode-ui.el 中的行。

("\r"                       'besi-newline)

一行 (require 'besi) 到开始scala-mode.el。

将其上传到 github 以方便参考 - besi

Answer 2

我尝试通过编辑 scala-mode-indent.el 文件来解决这个问题。在其他一些情况下，它会破坏缩进，但至少您不会将所有这些缩进半屏向前。

注释掉这一行：

;; (scala-indentation-from-following)

并修改 scala-indentation-from-preceding:

(defun scala-indentation-from-preceding ()
   ;; Return suggested indentation based on the preceding part of the
   ;; current expression. Return nil if indentation cannot be guessed.
   (save-excursion
   (scala-backward-spaces)
   (and 
     (not (bobp))
   (if (eq (char-syntax (char-before)) ?\()
      (scala-block-indentation)
      (progn
        (when (eq (char-before) ?\))
        (backward-sexp)
        (scala-backward-spaces))
        t
       ;;(scala-looking-at-backward scala-expr-start-re)

      ))
    (if (scala-looking-at-backward scala-expr-start-re)
      (+ (current-indentation) scala-mode-indent:step)
      (current-indentation)
    ))))

正如我所说，此后它仍然损坏。我计划很快写一个更好的支持，也许在一两周内。

编辑：

如果你想完全禁用 scala 缩进，请注释掉 scala-mode.el 中的行

;; indent-line-function          'scala-indent-line