From 0d1c45f9cfd3c8054cf7c73474df554d15d630f4 Mon Sep 17 00:00:00 2001
From: Sacha Chua <sacha@sachachua.com>
Date: Sun, 13 Nov 2022 13:43:53 -0500
Subject: Add private prefix

---
 emacsconf-pad.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'emacsconf-pad.el')

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