This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(function (run) { | |
run(Array.prototype, Array); | |
})(function (P, C) { | |
C.empty = C.zero = function () { | |
return []; | |
}; | |
C.isArrayOf = function (a, f) { | |
return Array.isArray(a) && a.every(x => f(x)); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(use-all "fs-extra" fse) | |
(defconstant *DEFAULT_ENCODING* "utf8") | |
(defconstant *DEFAULT_FILEMODE* 0o775) ; this does not work right now, sibilant does not support octals | |
(provide | |
(defun make-dir! (dir-path) | |
(|> dir-path |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
.bgimage { | |
display: block; | |
background-color: hsl(0, 0%, 0%); | |
background-repeat: no-repeat; | |
background-size: cover; | |
background-position: 50% 50%; | |
} | |
.bgimage--16_9 { | |
width: 100%; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import { VCell } from './vcell.js'; | |
const SELECTOR_WIDGET = '.accordion'; | |
const SELECTOR_CLICKAREA = '.accordion_btn'; | |
const SELECTOR_MASK = '.accordion_mask'; | |
const SELECTOR_BODYAREA = '.accordion_body'; | |
const CLASS_OPEN = 'is--open'; | |
export function autoStart(selector = SELECTOR_WIDGET) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(use-all "chart.js" chartjs) | |
(use "./chartbase" | |
(create-chart-base :as base) | |
(create-chart-colors :as colors)) | |
(provide | |
(defun create-pie-chart (data labels) | |
(lambda (el) | |
(let* ((place-into (base)) | |
(chart (new chartjs (place-into el) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
Copyright (c) 2022 David Hofmann <the.urban.drone@gmail.com> | |
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and | |
associated documentation files (the "Software"), to deal in the Software without restriction, including | |
without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the | |
following conditions: | |
The above copyright notice and this permission notice shall be included in all copies or substantial portions | |
of the Software. |