[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 60f6bd8: * lisp/xwidget.el (xwidget-webkit-scroll
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs-25 60f6bd8: * lisp/xwidget.el (xwidget-webkit-scroll-behavior): |
Date: |
Mon, 25 Jan 2016 23:19:39 +0000 |
branch: emacs-25
commit 60f6bd85a61ab0e46a51ed6adc7e13f05d43338a
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
* lisp/xwidget.el (xwidget-webkit-scroll-behavior):
Rename using American spelling. Update all uses.
---
lisp/xwidget.el | 20 ++++++++++----------
1 files changed, 10 insertions(+), 10 deletions(-)
diff --git a/lisp/xwidget.el b/lisp/xwidget.el
index ec611fe..9f257ba 100644
--- a/lisp/xwidget.el
+++ b/lisp/xwidget.el
@@ -34,7 +34,7 @@
(require 'cl-lib)
(require 'bookmark)
-(defcustom xwidget-webkit-scroll-behaviour 'native
+(defcustom xwidget-webkit-scroll-behavior 'native
"Scrolling behavior of the webkit instance.
The possible values are: `native' or `image'."
:version "25.1"
@@ -140,37 +140,37 @@ Interactively, URL defaults to the string looking like a
url around point."
(defun xwidget-webkit-scroll-up ()
"Scroll webkit up.
-Depending on the value of `xwidget-webkit-scroll-behaviour',
+Depending on the value of `xwidget-webkit-scroll-behavior',
this scrolls in 'native' fashion, or like `image-mode' would."
(interactive)
- (if (eq xwidget-webkit-scroll-behaviour 'native)
+ (if (eq xwidget-webkit-scroll-behavior 'native)
(xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t 50)
(image-scroll-up)))
(defun xwidget-webkit-scroll-down ()
"Scroll webkit down.
-Depending on the value of `xwidget-webkit-scroll-behaviour',
+Depending on the value of `xwidget-webkit-scroll-behavior',
this scrolls in 'native' fashion, or like `image-mode' would."
(interactive)
- (if (eq xwidget-webkit-scroll-behaviour 'native)
+ (if (eq xwidget-webkit-scroll-behavior 'native)
(xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t -50)
(image-scroll-down)))
(defun xwidget-webkit-scroll-forward ()
"Scroll webkit forwards.
-Depending on the value of `xwidget-webkit-scroll-behaviour',
+Depending on the value of `xwidget-webkit-scroll-behavior',
this scrolls in 'native' fashion, or like `image-mode' would."
(interactive)
- (if (eq xwidget-webkit-scroll-behaviour 'native)
+ (if (eq xwidget-webkit-scroll-behavior 'native)
(xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t 50)
(xwidget-webkit-scroll-forward))) ; FIXME infloop!
(defun xwidget-webkit-scroll-backward ()
"Scroll webkit backwards.
-Depending on the value of `xwidget-webkit-scroll-behaviour',
+Depending on the value of `xwidget-webkit-scroll-behavior',
this scrolls in 'native' fashion, or like `image-mode' would."
(interactive)
- (if (eq xwidget-webkit-scroll-behaviour 'native)
+ (if (eq xwidget-webkit-scroll-behavior 'native)
(xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t -50)
(xwidget-webkit-scroll-backward))) ; FIXME infloop!
@@ -415,7 +415,7 @@ For example, use this to display an anchor."
(defun xwidget-webkit-adjust-size-dispatch ()
"Adjust size according to mode."
(interactive)
- (if (eq xwidget-webkit-scroll-behaviour 'native)
+ (if (eq xwidget-webkit-scroll-behavior 'native)
(xwidget-webkit-adjust-size-to-window)
(xwidget-webkit-adjust-size-to-content))
;; The recenter is intended to correct a visual glitch.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 60f6bd8: * lisp/xwidget.el (xwidget-webkit-scroll-behavior):,
Glenn Morris <=