From 0d1c45f9cfd3c8054cf7c73474df554d15d630f4 Mon Sep 17 00:00:00 2001 From: Sacha Chua Date: Sun, 13 Nov 2022 13:43:53 -0500 Subject: Add private prefix --- emacsconf-pad.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/emacsconf-pad.el b/emacsconf-pad.el index d11f067..a274ee5 100644 --- a/emacsconf-pad.el +++ b/emacsconf-pad.el @@ -366,7 +366,9 @@ ${next-talk-list} (interactive) (let ((info (emacsconf-prepare-for-display (emacsconf-get-talk-info)))) (mapc (lambda (shift) - (let ((pad-id (format "private_%s" (plist-get shift :id)))) + (let ((pad-id (format "private_%s_%s" + emacsconf-private-pad-prefix + (plist-get shift :id)))) (emacsconf-pad-create-pad pad-id) (emacsconf-pad-set-html pad-id @@ -448,5 +450,6 @@ ${next-talk-list} nil nil 1)))) (if do-insert (insert result)) result)) + (provide 'emacsconf-pad) ;;; emacsconf-pad.el ends here -- cgit v1.2.3