emacs - emacs で複数のファイルを連結する

Question

emacs を使用して、ディレクトリ内のすべてのファイルから 1 つの長いファイルを作成する高速な (自動) 方法はありますか? IE

>Text_1.txt

>{contents of Text_1}

>Text_2.txt

>{contents of text2}


>FinalResult.txt
>{contents of Text_1
>contents of Text2}

Answer 1

これはどう：

(defun insert-my-files ()
  (interactive)
  (let ((dir (read-directory-name "Directory to insert: ")))
    (mapc #'(lambda (file) 
              (let ((file-full (concat dir file)))
                (insert-file-contents file-full)))
          (cddr (directory-files dir)))))

で呼び出すとM-x insert-my-files、指定したディレクトリの内容が挿入されます。

Answer 2

これを高速な方法と呼ぶかどうかはわかりませんがinsert-file、既存のバッファーにファイルを挿入するために使用できます。

ただし、あなたが話している特定のケースでは、最も速い方法はおそらくコマンドラインからです：cat * > FinalResult.txt