shithub: riscv

Download patch

ref: 4f1575a44ee0a22e1a8c8e6dbcc552f36fa69480
parent: 57be281166b2707c6fcf791c1447dccefade44a2
author: stanley lieber <[email protected]>
date: Tue Apr 24 15:17:22 EDT 2012 

samterm: enable scroll wheel scrolling in the scrollbar (for scrolling)


--- a/sys/src/cmd/samterm/main.c
+++ b/sys/src/cmd/samterm/main.c
@@ -94,11 +94,11 @@
 						chord &= ~4;
 					}
 				}
-			} else if(mousep->buttons&1){
+			} else if(mousep->buttons&1 || mousep->buttons&8){
 				if(nwhich){
 					if(nwhich!=which)
 						current(nwhich);
-					else if(scr)
+					else if(scr || mousep->buttons&8)
 						scroll(which, 1);
 					else{
 						t=(Text *)which->user1;
@@ -116,8 +116,8 @@
 					scroll(which, 2);
 				else
 					menu2hit();
-			}else if((mousep->buttons&4)){
-				if(scr)
+			}else if((mousep->buttons&4 || mousep->buttons&16)){
+				if(scr || mousep->buttons&16)
 					scroll(which, 3);
 				else
 					menu3hit();