aboutsummaryrefslogtreecommitdiff
path: root/lisp/seam.el
diff options
context:
space:
mode:
authorSpencer Williams <spnw@plexwave.org>2025-07-06 21:51:51 -0400
committerSpencer Williams <spnw@plexwave.org>2025-07-06 21:54:37 -0400
commitfd849e28022c03c7925fd2b4693c0497327adefc (patch)
tree4dfe7dab78130aeed1aaef99f07570446a7cc058 /lisp/seam.el
parentc9d05000cc82bda0701a2a18bc886dcb4a9c9c1c (diff)
Rename seam-make-note
Diffstat (limited to 'lisp/seam.el')
-rw-r--r--lisp/seam.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/seam.el b/lisp/seam.el
index 0bd0f96..113d2c8 100644
--- a/lisp/seam.el
+++ b/lisp/seam.el
@@ -99,7 +99,7 @@ naming. Must be a function taking two arguments: TITLE and TYPE."
(org-mark-ring-push)
(if-let ((file (seam-lookup-slug path)))
(find-file file)
- (seam-make-note path nil t))
+ (seam-create-note path nil t))
(seam-set-buffer-name))
(defvar seam-note-file-regexp "\\`[^.].+\\.org\\'")
@@ -203,7 +203,7 @@ naming. Must be a function taking two arguments: TITLE and TYPE."
(unless (member type (seam-get-all-note-type-names))
(error "`%s' is not a valid Seam note type" type)))
-(defun seam-make-note (title &optional type select)
+(defun seam-create-note (title &optional type select)
(unless type
(setq type seam-default-note-type))
(seam-validate-note-type type)
@@ -274,7 +274,7 @@ completion prompt is given to choose the type."
;; formatter function) (NOTE: Redundant if buffer wasn't
;; already open, as `seam-setup-buffer' does this too.)
(seam-set-buffer-name))
- (seam-make-note (string-trim completion) (or type seam-default-note-type) t)))))
+ (seam-create-note (string-trim completion) (or type seam-default-note-type) t)))))
(cl-defun seam-get-note-type (file &optional no-error)
(when (and file (equal "org" (file-name-extension file)))
@@ -621,7 +621,7 @@ link will replace it."
(cl-destructuring-bind (completion . file) (seam-read-title "Insert note link: ")
(let* ((new-buffer
(unless file
- (seam-make-note completion seam-default-note-type nil)))
+ (seam-create-note completion seam-default-note-type nil)))
(selection (when (use-region-p)
(buffer-substring
(region-beginning)