Be more strict about model changes (#406)

This commit is contained in:
Yannik Sander 2021-12-31 15:34:51 +01:00 committed by GitHub
parent 477ef70b06
commit 5d965dd10c
Failed to generate hash of commit

View file

@ -191,17 +191,17 @@ pageMatch m1 m2 =
( Home _, Home _ ) ->
True
( Packages _, Packages _ ) ->
True
( Packages model_a, Packages model_b ) ->
{model_a | show = Nothing } == {model_b | show = Nothing}
( Options _, Options _ ) ->
True
( Options model_a, Options model_b ) ->
{model_a | show = Nothing } == {model_b | show = Nothing}
( Flakes (OptionModel _), Flakes (OptionModel _) ) ->
True
( Flakes (OptionModel model_a), Flakes (OptionModel model_b) ) ->
{model_a | show = Nothing } == {model_b | show = Nothing}
( Flakes (PackagesModel _), Flakes (PackagesModel _) ) ->
True
( Flakes (PackagesModel model_a), Flakes (PackagesModel model_b) ) ->
{model_a | show = Nothing } == {model_b | show = Nothing}
_ ->
False