Add yasnippet.

[gnu-emacs-elpa] / packages / yasnippet / snippets / emacs-lisp-mode / x-file.process.yasnippet

diff --git a/packages/yasnippet/snippets/emacs-lisp-mode/x-file.process.yasnippet b/packages/yasnippet/snippets/emacs-lisp-mode/x-file.process.yasnippet
new file mode 100644 (file)
index 0000000..dc60b17
--- /dev/null
+++ b/packages/yasnippet/snippets/emacs-lisp-mode/x-file.process.yasnippet
@@ -0,0 +1,18 @@
+# contributor: Xah Lee (XahLee.org)
+# name: a function that process a file
+# key: x-file
+# --
+(defun doThisFile (fpath)
+  "Process the file at path FPATH ..."
+  (let ()
+    ;; create temp buffer without undo record or font lock. (more efficient)
+    ;; first space in temp buff name is necessary
+    (set-buffer (get-buffer-create " myTemp"))
+    (insert-file-contents fpath nil nil nil t)
+
+    ;; process it ...
+    ;; (goto-char 0) ; move to begining of file's content (in case it was open)
+    ;; ... do something here
+    ;; (write-file fpath) ;; write back to the file
+
+    (kill-buffer " myTemp")))
\ No newline at end of file