From 6a79cdb5cd9c4c93d15642816d398bcbe36fd692 Mon Sep 17 00:00:00 2001
From: Ben Boeckel <MathStuf@gmail.com>
Date: Mon, 3 Oct 2011 12:54:23 -0400
Subject: Add absolute scrolling argument

---
 src/commands.c  | 1 +
 src/uzbl-core.c | 2 ++
 2 files changed, 3 insertions(+)

(limited to 'src')

diff --git a/src/commands.c b/src/commands.c
index ff3b15f..8896250 100644
--- a/src/commands.c
+++ b/src/commands.c
@@ -116,6 +116,7 @@ toggle_status (WebKitWebView* page, GArray *argv, GString *result) {
  * scroll vertical 20
  * scroll vertical 20%
  * scroll vertical -40
+ * scroll vertical 20!
  * scroll vertical begin
  * scroll vertical end
  * scroll horizontal 10
diff --git a/src/uzbl-core.c b/src/uzbl-core.c
index c3bc2dd..e869162 100644
--- a/src/uzbl-core.c
+++ b/src/uzbl-core.c
@@ -331,6 +331,8 @@ scroll(GtkAdjustment* bar, gchar *amount_str) {
 
     if (*end == '%')
         value += page_size * amount * 0.01;
+    else if (*end == '!')
+        value = amount;
     else
         value += amount;
 
-- 
cgit v1.2.3