diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-11-13 13:43:53 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-11-13 13:43:53 -0500 |
| commit | 0d1c45f9cfd3c8054cf7c73474df554d15d630f4 (patch) | |
| tree | b6303a59ea3de763971c074fd1f2204ca87e0284 | |
| parent | 3cbda731d7d2c6daf08bb9e645ec53d041651e35 (diff) | |
| download | emacsconf-el-0d1c45f9cfd3c8054cf7c73474df554d15d630f4.tar.xz emacsconf-el-0d1c45f9cfd3c8054cf7c73474df554d15d630f4.zip | |
Add private prefix
Diffstat (limited to '')
| -rw-r--r-- | emacsconf-pad.el | 5 |
1 files changed, 4 insertions, 1 deletions
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 |