about summary refs log tree commit diff
path: root/configs/shared/emacs/.emacs.d/wpc/fs-functions.el
diff options
context:
space:
mode:
Diffstat (limited to 'configs/shared/emacs/.emacs.d/wpc/fs-functions.el')
-rw-r--r--configs/shared/emacs/.emacs.d/wpc/fs-functions.el24
1 files changed, 0 insertions, 24 deletions
diff --git a/configs/shared/emacs/.emacs.d/wpc/fs-functions.el b/configs/shared/emacs/.emacs.d/wpc/fs-functions.el
deleted file mode 100644
index 9ca970c242c3..000000000000
--- a/configs/shared/emacs/.emacs.d/wpc/fs-functions.el
+++ /dev/null
@@ -1,24 +0,0 @@
-;;; fs-functions.el --- Functions to make working with the filesystem easier. -*- lexical-binding: t -*-
-;; Author: William Carroll <wpcarro@gmail.com>
-
-;;; Commentary:
-;; Hosts ergonomic functions for working with a filesystem.
-
-;;; Code:
-(defun ensure-file-path (path)
-  "Ensure that a file and its directories in PATH exist.
-Will error for inputs with a trailing slash."
-  (when (s-ends-with? "/" path)
-    (error (format "Input path has trailing slash: %s" path)))
-  (let ((dirs (->> path f-dirname f-split)))
-    (apply #'f-mkdir dirs)
-    (f-touch path)))
-
-(defun ensure-dir-path (path)
-  "Ensures that a directory and its ancestor directories in PATH exist."
-  (->> path
-       f-split
-       (apply #'f-mkdir)))
-
-(provide 'fs-functions)
-;;; fs-functions.el ends here