Give the AutoToggle palette a custom editor

core/language/en-GB/ControlPanel.multids

@@ -57,7 +57,7 @@ LayoutSwitcher/Caption: Layout
 LoadedModules/Caption: Loaded Modules
 LoadedModules/Hint: These are the currently loaded tiddler modules linked to their source tiddlers. Any italicised modules lack a source tiddler, typically because they were setup during the boot process.
 Palette/Caption: Palette
-Palette/CustomEditor/Prompt: Custom editor for current palette:
+Palette/CustomEditor/Prompt: Custom editor for current palette: <<palette-link>>
 Palette/Editor/Clone/Caption: clone
 Palette/Editor/Clone/Prompt: It is recommended that you clone this shadow palette before editing it
 Palette/Editor/Delete/Hint: delete this entry from the current palette

core/palettes/AutoToggle.tid

@@ -5,9 +5,6 @@ tags: $:/tags/Palette
 type: application/x-tiddler-dictionary
 color-scheme: [{$:/info/browser/darkmode}match[no]then[light]else[dark]]
 palette-type: classic
-editor: $:/palette-editors/TwentyTwenties
+editor: $:/palette-editors/AutoToggle
 palette-import@light: $:/palettes/FlexokiLight
 palette-import@dark: $:/palettes/FlexokiDark
-
-page-background@light: green
-page-background@dark: red

core/palettes/AutoToggleEditor.tid

@@ -0,0 +1,28 @@
+title: $:/palette-editors/AutoToggle
+
+\procedure set-imported-palette(field)
+<$select field=<<field>>>
+	<$list filter="[all[shadows+tiddlers]tag[$:/tags/Palette]sort[name]] :filter[{!!palette-type}!match[]else[classic]match<palette-type>] -[<currentTiddler>]">
+		<option value=<<currentTiddler>>><$view field="name"><$view field="title"/></$view></option>
+	</$list>
+</$select>
+\end set-imported-palette
+
+This palette can be used to automatically switch between two palettes based on the browser's dark mode setting.
+
+<$tiddler tiddler={{$:/palette}}>
+
+Palette type: <$select field="palette-type" default="classic">
+	<option value="classic">Classic</option>
+	<option value="modern">Modern</option>
+</$select>
+
+<$let palette-type={{!!palette-type}}>
+
+Light palette: <<set-imported-palette field:"palette-import@light">>
+
+Dark palette: <<set-imported-palette field:"palette-import@dark">>
+
+</$let>
+
+</$tiddler>

core/ui/PaletteManager.tid

@@ -2,6 +2,16 @@ title: $:/PaletteManager
 
 \define lingo-base() $:/language/ControlPanel/Palette/
 
+\procedure palette-link()
+<$tiddler tiddler={{$:/palette}}>
+	<$link to={{!!title}}>
+		<$view field="name" format="text">
+			<$view field="title" format="text"/>
+		</$view>
+	</$link>
+</$tiddler>
+\end palette-link
+
 <$transclude $tiddler="$:/snippets/paletteswitcher" thumbnails="yes"/>
 
 {{$:/snippets/palettetests}}

core/wiki/palette.tid

@@ -1,3 +1,3 @@
 title: $:/palette
 
-$:/palettes/Vanilla
+$:/palettes/AutoToggle