diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-12 01:06:39 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-12 01:06:39 +0200 |
commit | 8b397e05a8e80b5d50cdbf94d8858c617c5ebafd (patch) | |
tree | 0e239ef7c1613b701d4b604149adb2f0f315e4af /module/html/vcomponent.scm | |
parent | Remove week-start from (html view calendar) (again?) (diff) | |
download | calp-8b397e05a8e80b5d50cdbf94d8858c617c5ebafd.tar.gz calp-8b397e05a8e80b5d50cdbf94d8858c617c5ebafd.tar.xz |
Massivly simplify config internals.
Diffstat (limited to 'module/html/vcomponent.scm')
-rw-r--r-- | module/html/vcomponent.scm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/module/html/vcomponent.scm b/module/html/vcomponent.scm index f9c24ecd..9189b59e 100644 --- a/module/html/vcomponent.scm +++ b/module/html/vcomponent.scm @@ -5,6 +5,7 @@ :use-module (srfi srfi-41) :use-module (datetime) :use-module (html util) + :use-module ((html config) :select (edit-mode)) :use-module ((html components) :select (btn tabset)) :use-module ((output general) :select (calculate-fg-color)) :use-module ((vcomponent datetime output) @@ -174,9 +175,10 @@ title: "Stäng" onclick: "close_popup(document.getElementById(this.closest('.popup-container').id))" class: '("close-tooltip")) - ,(btn "🗑" - title: "Ta bort" - onclick: "remove_event(document.getElementById(this.closest('.popup-container').id.substr(5)))")) + ,(when (edit-mode) + (btn "🗑" + title: "Ta bort" + onclick: "remove_event(document.getElementById(this.closest('.popup-container').id.substr(5)))"))) ,(tabset `(("📅" title: "Översikt" |