feat: smaller user images and icons

Author: FreekBes

public/js/interactive_maps.js

@@ -5399,27 +5399,27 @@ var $author$project$Main$calcMapSettings = F2(
 		switch (_class) {
 			case 0:
 				if (!orientation) {
-					return A4($author$project$Clustermap$MapSettings, height, width, 50, 16);
+					return A4($author$project$Clustermap$MapSettings, height, width, 40, 12);
 				} else {
-					return A4($author$project$Clustermap$MapSettings, height, width, 32, 12);
+					return A4($author$project$Clustermap$MapSettings, height, width, 26, 8);
 				}
 			case 1:
 				if (!orientation) {
-					return A4($author$project$Clustermap$MapSettings, height, width, 50, 16);
+					return A4($author$project$Clustermap$MapSettings, height, width, 45, 12);
 				} else {
-					return A4($author$project$Clustermap$MapSettings, height, width, 50, 16);
+					return A4($author$project$Clustermap$MapSettings, height, width, 45, 12);
 				}
 			case 2:
 				if (!orientation) {
-					return A4($author$project$Clustermap$MapSettings, height, width, 55, 18);
+					return A4($author$project$Clustermap$MapSettings, height, width, 45, 15);
 				} else {
-					return A4($author$project$Clustermap$MapSettings, height, width, 55, 18);
+					return A4($author$project$Clustermap$MapSettings, height, width, 45, 15);
 				}
 			default:
 				if (!orientation) {
-					return A4($author$project$Clustermap$MapSettings, height, width, 70, 24);
+					return A4($author$project$Clustermap$MapSettings, height, width, 60, 20);
 				} else {
-					return A4($author$project$Clustermap$MapSettings, height, width, 70, 24);
+					return A4($author$project$Clustermap$MapSettings, height, width, 60, 20);
 				}
 		}
 	});

src/elm/clustermap/Main.elm

@@ -145,34 +145,34 @@ calcMapSettings window { class, orientation } =
         Phone ->
             case orientation of
                 Portrait ->
-                    Clustermap.MapSettings height width 50 16
+                    Clustermap.MapSettings height width 40 12
 
                 Landscape ->
-                    Clustermap.MapSettings height width 32 12
+                    Clustermap.MapSettings height width 26 8
 
         Tablet ->
             case orientation of
                 Portrait ->
-                    Clustermap.MapSettings height width 50 16
+                    Clustermap.MapSettings height width 45 12
 
                 Landscape ->
-                    Clustermap.MapSettings height width 50 16
+                    Clustermap.MapSettings height width 45 12
 
         Desktop ->
             case orientation of
                 Portrait ->
-                    Clustermap.MapSettings height width 55 18
+                    Clustermap.MapSettings height width 45 15
 
                 Landscape ->
-                    Clustermap.MapSettings height width 55 18
+                    Clustermap.MapSettings height width 45 15
 
         BigDesktop ->
             case orientation of
                 Portrait ->
-                    Clustermap.MapSettings height width 70 24
+                    Clustermap.MapSettings height width 60 20
 
                 Landscape ->
-                    Clustermap.MapSettings height width 70 24
+                    Clustermap.MapSettings height width 60 20
 
 
 update : Msg -> Model -> ( Model, Cmd Msg )