From bb4be57d21a47f9d975edd2beb9578e0f54b83df Mon Sep 17 00:00:00 2001
From: Christian Mollekopf <chrigi_1@fastmail.fm>
Date: Mon, 9 Apr 2018 12:42:54 +0200
Subject: Added scrolling shortcuts

---
 framework/qml/ConversationListView.qml |  8 ++++++++
 framework/qml/ConversationView.qml     | 10 ++++++++++
 framework/qml/Messages.qml             |  2 ++
 views/conversation/qml/View.qml        |  8 ++++++++
 4 files changed, 28 insertions(+)

diff --git a/framework/qml/ConversationListView.qml b/framework/qml/ConversationListView.qml
index 1d408edc..c84bbf6d 100644
--- a/framework/qml/ConversationListView.qml
+++ b/framework/qml/ConversationListView.qml
@@ -37,6 +37,14 @@ FocusScope {
 
     property var currentItem: null
 
+    function scrollDown() {
+        scrollHelper.scrollDown()
+    }
+
+    function scrollUp() {
+        scrollHelper.scrollUp()
+    }
+
     function setCurrentItem() {
         if (currentItem) {
             currentItem.isCurrentItem = false
diff --git a/framework/qml/ConversationView.qml b/framework/qml/ConversationView.qml
index 1109ad8e..fc239d40 100644
--- a/framework/qml/ConversationView.qml
+++ b/framework/qml/ConversationView.qml
@@ -54,6 +54,16 @@ FocusScope {
         }
     }
 
+    Kube.Listener {
+        filter: Kube.Messages.scrollConversationDown
+        onMessageReceived: listView.scrollDown()
+    }
+
+    Kube.Listener {
+        filter: Kube.Messages.scrollConversationUp
+        onMessageReceived: listView.scrollUp()
+    }
+
     Rectangle {
         anchors.fill: parent
         color: Kube.Colors.backgroundColor
diff --git a/framework/qml/Messages.qml b/framework/qml/Messages.qml
index 630d05ab..1483a71c 100644
--- a/framework/qml/Messages.qml
+++ b/framework/qml/Messages.qml
@@ -58,5 +58,7 @@ Item {
     property string selectPreviousMessage: "selectPreviousMessage"
     property string selectNextFolder: "selectNextFolder"
     property string selectPreviousFolder: "selectPreviousFolder"
+    property string scrollConversationDown: "scrollConversationDown"
+    property string scrollConversationUp: "scrollConversationUp"
 }
 
diff --git a/views/conversation/qml/View.qml b/views/conversation/qml/View.qml
index 4cfac3df..088b7ae5 100644
--- a/views/conversation/qml/View.qml
+++ b/views/conversation/qml/View.qml
@@ -37,6 +37,14 @@ FocusScope {
         sequences: ['k']
         onActivated: Kube.Fabric.postMessage(Kube.Messages.selectPreviousConversation, {})
     }
+    Shortcut {
+        sequences: ['Shift+J']
+        onActivated: Kube.Fabric.postMessage(Kube.Messages.scrollConversationDown, {})
+    }
+    Shortcut {
+        sequences: ['Shift+K']
+        onActivated: Kube.Fabric.postMessage(Kube.Messages.scrollConversationUp, {})
+    }
     Shortcut {
         sequences: ['n']
         onActivated: Kube.Fabric.postMessage(Kube.Messages.selectNextMessage, {})
-- 
cgit v1.2.3