From 489a683f64cd7a504a3b5fd60087859d001ec209 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Thu, 22 Sep 2022 14:24:36 -0500 Subject: [PATCH] Add: (ement-message) --- ement-lib.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/ement-lib.el b/ement-lib.el index a80377c..2818ec7 100644 --- a/ement-lib.el +++ b/ement-lib.el @@ -319,6 +319,11 @@ If DELETE (interactively, with prefix), delete it." ;; These functions could reasonably be called by code in other packages. +(defun ement-message (format-string &rest args) + "Call `message' on FORMAT-STRING prefixed with \"Ement: \"." + ;; TODO: Use this function everywhere we use `message'. + (apply #'message (concat "Ement: " format-string) args)) + (cl-defun ement-upload (session &key data filename then else (content-type "application/octet-stream")) "Upload DATA with FILENAME to content repository on SESSION.