clamp active window text to 1/4 of bar length

modules/bar/ActiveWindow.qml

@@ -1,18 +1,22 @@
 pragma ComponentBehavior: Bound
-import Quickshell.Widgets
 import Quickshell.Wayland
+import Quickshell
 import QtQuick
 import QtQuick.Layouts
-import qs
 import qs.widgets
 import qs.settings
 
 BarComponent {
     id: root
-    implicitWidth: windowText.implicitWidth +16
-    StyledText {
-	id: windowText
-	anchors.centerIn: parent
-	text: ToplevelManager.activeToplevel?.title ?? "Desktop"
+    required property ShellScreen screen
+    implicitWidth: windowText.implicitWidth + 16
+    RowLayout {
+        id: windowText
+        anchors.centerIn: parent
+        StyledText {
+            Layout.maximumWidth: root.screen.width / 4
+            text: ToplevelManager.activeToplevel?.title ?? "Desktop"
+	    elide: Text.ElideRight
+        }
     }
 }

modules/bar/Bar.qml

@@ -33,7 +33,7 @@ Variants {
                 Ws {
                     barScreen: root.modelData
                 }
-                ActiveWindow {}
+                ActiveWindow {screen: root.modelData}
             }
             RowLayout {
                 anchors.centerIn: parent