diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-11 21:31:52 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-11 21:31:52 +0200 |
| commit | e360d3566eb878a944dada510a0c7e8437a5554b (patch) | |
| tree | 7b338ef505acba0b14f0f32b11355f4f716561c3 /module/html/vcomponent.scm | |
| parent | Limit CAL_ class to once per 'thing'. (diff) | |
| download | calp-e360d3566eb878a944dada510a0c7e8437a5554b.tar.gz calp-e360d3566eb878a944dada510a0c7e8437a5554b.tar.xz | |
Fix frontend for calendar choosing.
Diffstat (limited to 'module/html/vcomponent.scm')
| -rw-r--r-- | module/html/vcomponent.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/module/html/vcomponent.scm b/module/html/vcomponent.scm index 5123af09..3fac17bb 100644 --- a/module/html/vcomponent.scm +++ b/module/html/vcomponent.scm @@ -168,10 +168,13 @@ (define-public (popup ev id) - `(div (@ (class "popup-container") (id ,id) + `(div (@ (id ,id) (class "popup-container CAL_" + ,(html-attr (or (prop (parent ev) 'NAME) + "unknown"))) (onclick "event.stopPropagation()")) - (div (@ (class "popup CAL_" ,(html-attr (or (prop (parent ev) 'NAME) - "unknown"))) ) + ;; TODO all (?) code uses .popup-container as the popup, while .popup sits and does nothing. + ;; Do something about this? + (div (@ (class "popup")) (nav (@ (class "popup-control")) ,(btn "×" title: "Stäng" |