Source Code

(define-map platform-settings (string-ascii 32) uint)
(define-map feature-flags (string-ascii 32) bool)
(define-data-var admin principal tx-sender)
(define-read-only (get-setting (key (string-ascii 32))) (default-to u0 (map-get? platform-settings key)))
(define-read-only (is-feature-enabled (feature (string-ascii 32))) (default-to false (map-get? feature-flags feature)))
(define-public (set-setting (key (string-ascii 32)) (value uint))
  (begin
    (asserts! (is-eq tx-sender (var-get admin)) (err u1))
    (map-set platform-settings key value)
    (ok true)))
(define-public (set-feature (feature (string-ascii 32)) (enabled bool))
  (begin
    (asserts! (is-eq tx-sender (var-get admin)) (err u1))
    (map-set feature-flags feature enabled)
    (ok true)))

Functions (4)

FunctionAccessArgs
get-settingread-onlykey: (string-ascii 32
is-feature-enabledread-onlyfeature: (string-ascii 32
set-settingpublickey: (string-ascii 32
set-featurepublicfeature: (string-ascii 32