@@ -1550,20 +1550,16 @@ classifyDevice : { window | height : Int, width : Int } -> Device
1550classifyDevice window =
1550classifyDevice window =
1551 { class =
1551 { class =
1553− shortSide =
1553+ longSide =
1554− if window.width < window.height then
1558− window.height
1554+ max window.width window.height
1560− if shortSide <= 600 then
1556+ if longSide <= 600 then
1563− else if shortSide > 600 && shortSide <= 1200 then
1559+ else if longSide > 600 && longSide <= 1200 then
1566− else if shortSide > 1200 && shortSide <= 1800 then
1562+ else if longSide > 1200 && longSide <= 1800 then