+28 -1

src/Applications/UI/Adjunct.elm

reviewed

··· 119 119 120 120 -- 121 121 [ Keyboard.Escape ] -> 122 122 - hideOverlay m 122 122 + if Maybe.isJust m.contextMenu then 123 123 + Return.singleton { m | contextMenu = Nothing } 124 124 + 125 125 + else if Maybe.isJust m.confirmation then 126 126 + Return.singleton { m | confirmation = Nothing } 127 127 + 128 128 + else if Maybe.isJust m.alfred then 129 129 + Return.singleton { m | alfred = Nothing } 130 130 + 131 131 + else if Maybe.isJust m.selectedCover then 132 132 + Return.singleton { m | selectedCover = Nothing } 133 133 + 134 134 + else 135 135 + case m.page of 136 136 + Page.Equalizer -> 137 137 + Return.singleton { m | page = Page.Index } 138 138 + 139 139 + Page.Playlists Playlists.Index -> 140 140 + Return.singleton { m | page = Page.Index } 141 141 + 142 142 + Page.Playlists _ -> 143 143 + Return.singleton { m | page = Page.Playlists Playlists.Index } 144 144 + 145 145 + Page.Queue _ -> 146 146 + Return.singleton { m | page = Page.Index } 147 147 + 148 148 + _ -> 149 149 + skip 123 150 124 151 _ -> 125 152 skip

-3

src/Applications/UI/Interface/State.elm

reviewed

··· 133 133 else if Maybe.isJust model.alfred then 134 134 Return.singleton { model | alfred = Nothing } 135 135 136 136 - else if Maybe.isJust model.selectedCover then 137 137 - Return.singleton { model | selectedCover = Nothing } 138 138 - 139 136 else 140 137 Return.singleton model 141 138