From 15c0d4b7c42f973296f372330fefe1c7f08895b4 Mon Sep 17 00:00:00 2001
From: cinap_lenrek <cinap_lenrek@gmx.de>
Date: Sat, 28 Jul 2012 14:47:35 +0200
Subject: [PATCH] rio: add scroll lock key to toggle scroll mode

---
 sys/src/cmd/rio/wind.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/sys/src/cmd/rio/wind.c b/sys/src/cmd/rio/wind.c
index 527c23de6..839d80cd7 100644
--- a/sys/src/cmd/rio/wind.c
+++ b/sys/src/cmd/rio/wind.c
@@ -665,6 +665,10 @@ wkeyctl(Window *w, Rune r)
 		case Kend:
 			wshow(w, w->nr);
 			return;
+		case Kscroll:
+			w->scrolling ^= 1;
+			wshow(w, w->nr);
+			return;
 		case Ksoh:	/* ^A: beginning of line */
 			if(w->q0==0 || w->q0==w->qh || w->r[w->q0-1]=='\n')
 				return;