procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Fix last change (bug#68604)

Browse source 
* lisp/xwidget.el (xwidget-webkit-disable-javascript): Move from
here...
* lisp/cus-start.el (standard): ...to here.

* src/xwidget.c (syms_of_xwidget)
<xwidget-webkit-disable-javascript>: Doc fix.

* doc/emacs/misc.texi (Embedded WebKit Widgets): Fix wording.
This commit is contained in:
Eli Zaretskii 2024-03-14 11:32:00 +02:00
parent f6a27bc32d
commit a60804ab95
4 changed files with 12 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
doc/emacs/misc.texi
View file

@ -3011,10 +3011,11 @@ It is bound to @kbd{H}.
@vindex xwidget-webkit-disable-javascript
@cindex disabling javascript in webkit buffers
JavaScript is enabled by default inside WebKit buffers, this can be
undesirable as websites often use it to track your online activity. It
can be disabled by setting the variable @code{xwidget-webkit-disable-javascript} to @code{t}.
You must kill all WebKit buffers for this setting to take effect after
JavaScript is enabled by default inside WebKit buffers, which could be
undesirable, as Web sites often use it to track your online activity.
You can disable JavaScript in WebKit buffers by customizing the variable
@code{xwidget-webkit-disable-javascript} to a non-@code{nil} value.
You must kill all WebKit buffers for this setting to take effect, after
it is changed.
@node Browse-URL

4
lisp/cus-start.el
View file

@ -846,6 +846,8 @@ since it could result in memory overflow and make Emacs crash."
(x-select-enable-clipboard-manager killing boolean "24.1")
;; xsettings.c
(font-use-system-font font-selection boolean "23.2")
;; xwidget.c
(xwidget-webkit-disable-javascript xwidget boolean "30.1")
;; haikuterm.c
(haiku-debug-on-fatal-error debug boolean "29.1")
;; haikufns.c
@ -906,6 +908,8 @@ since it could result in memory overflow and make Emacs crash."
(symbol-name symbol))
;; Any function from fontset.c will do.
(fboundp 'new-fontset))
((string-match "xwidget-" (symbol-name symbol))
(boundp 'xwidget-internal))
(t t))))
(if (not (boundp symbol))
;; If variables are removed from C code, give an error here!

7
lisp/xwidget.el
View file

@ -116,13 +116,6 @@ buffers for this setting to take effect after setting it to nil."
:type '(choice (const :tag "Do not store cookies" nil) file)
:version "29.1")
(defcustom xwidget-webkit-disable-javascript nil
"If non-nil, disables the execution of JavaScript in xwidget webkit sessions.
You must kill all xwidget-webkit buffers for this setting to take
effect after changing it."
:type '(boolean)
:version "30.0")
;;;###autoload
(defun xwidget-webkit-browse-url (url &optional new-session)
"Ask xwidget-webkit to browse URL.

6
src/xwidget.c
View file

@ -3973,9 +3973,9 @@ syms_of_xwidget (void)
Vxwidget_view_list = Qnil;
DEFVAR_BOOL("xwidget-webkit-disable-javascript", xwidget_webkit_disable_javascript,
doc: /* If non-nil, disables the execution of JavaScript in xwidget webkit sessions.
You must kill all xwidget-webkit buffers for this setting to take
effect after changing it. */);
doc: /* If non-nil, disable execution of JavaScript in xwidget webkit sessions.
You must kill all xwidget-webkit buffers for this setting to take effect
after changing it. */);
xwidget_webkit_disable_javascript = false;
Fprovide (intern ("xwidget-internal"), Qnil);