Rename function delete-activity-log to history-clear.

* All function that have edit history will be written with -history-.

1 files changed, 2 insertions, 2 deletions

diff --git a/gnosis.el b/gnosis.el
index 73cdebd..08689ab 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -1682,10 +1682,10 @@ If NEW? is non-nil, increment new notes log by 1."
     (gnosis-update 'activity-log `(= reviewed-total ,inc-total) `(= date ',date))
     (and new? (gnosis-update 'activity-log `(= reviewed-new ,inc-new) `(= date ',date)))))
 
-(defun gnosis-delete-activity-log ()
+(defun gnosis-history-clear ()
   "Delete all activity log entries."
   (interactive)
-  (when (y-or-n-p "Delete activity log?")
+  (when (y-or-n-p "Delete all activity log?")
     (emacsql gnosis-db [:delete :from activity-log])))
 
 (defun gnosis-review-note (id)