;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310%\207" [require cl-lib bookmark custom-declare-group xwidget nil "Displaying native widgets in Emacs buffers." :group widgets] 6)
#@290 Insert an xwidget at position POS.
Supply the xwidget's TYPE, TITLE, WIDTH, and HEIGHT.
See `make-xwidget' for the possible TYPE values.
The usage of optional argument ARGS depends on the xwidget.
This returns the result of `make-xwidget'.

(fn POS TYPE TITLE WIDTH HEIGHT &optional ARGS)
(defalias 'xwidget-insert #[1541 "b\210\300%\301``T\302\303\304E$\210\207" [make-xwidget put-text-property display xwidget :xwidget] 14 (#$ . 277)])
#@34 Return xwidget at POS.

(fn POS)
(defalias 'xwidget-at #[257 "\300
\301\"\211AA@
@\302=\205\211\207" [get-text-property display xwidget] 5 (#$ . 729)])
(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [require browse-url image-mode seq url-handlers] 2)
#@212 Ask xwidget-webkit to browse URL.
NEW-SESSION specifies whether to create a new xwidget-webkit session.
Interactively, URL defaults to the string looking like a url around point.

(fn URL &optional NEW-SESSION)
(defalias 'xwidget-webkit-browse-url #[513 "\300\301!\204\n\302\303!\210
;\205&\304\305\"\204\306P\262\211\203#\307!\207\310!\207" [featurep xwidget-internal user-error "Your Emacs was not compiled with xwidgets support" string-match "\\`[A-Za-z]+:" "https://" xwidget-webkit-new-session xwidget-webkit-goto-url] 5 (#$ . 1008) (byte-code "\300\301!\210\302\303!\207" [require browse-url browse-url-interactive-arg "xwidget-webkit URL: "] 2)])
#@178 Clone current URL into a new widget place in new window below.
Get the URL of current session, then browse to the URL
in `split-window-below' with a new xwidget webkit session.
(defalias 'xwidget-webkit-clone-and-split-below #[0 "\300 \301\302 !r\303\304\"\216\305
@\306\"\210\307!*\207" [xwidget-webkit-current-url internal--before-with-selected-window split-window-below make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord xwidget-webkit-new-session] 5 (#$ . 1679) [nil (xwidget-webkit-mode)]])
#@178 Clone current URL into a new widget place in new window right.
Get the URL of current session, then browse to the URL
in `split-window-right' with a new xwidget webkit session.
(defalias 'xwidget-webkit-clone-and-split-right #[0 "\300 \301\302 !r\303\304\"\216\305
@\306\"\210\307!*\207" [xwidget-webkit-current-url internal--before-with-selected-window split-window-right make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord xwidget-webkit-new-session] 5 (#$ . 2234) [nil (xwidget-webkit-mode)]])
#@35 Keymap for `xwidget-webkit-mode'.
(defvar xwidget-webkit-mode-map (byte-code "\300 \301
\302\303#\210\301
\304\305#\210\301
\306\307#\210\301
\310\311#\210\301
\312\313#\210\301
\314\315#\210\301
\316\317#\210\301
\320\321#\210\301
\322\323#\210\301
\324\325#\210\301
\326\327#\210\301
\330\331#\210\301
\332\331#\210\301
\333\334#\210\301
\335\327#\210\301
\336\337#\210\301
\340\331#\210\301
\341\342#\210\301
\343\344#\210\301
\345\342#\210\301
\346\344#\210\301
\347\337#\210\301
\350\334#\210\301
\351\352#\210\301
\353\354#\210\207" [make-sparse-keymap define-key "g" xwidget-webkit-browse-url "a" xwidget-webkit-adjust-size-dispatch "b" xwidget-webkit-back "f" xwidget-webkit-forward "r" xwidget-webkit-reload "t" #[0 "\300\301!\207" [message "o"] 2 nil nil] "
" xwidget-webkit-insert-string "w" xwidget-webkit-current-url "+" xwidget-webkit-zoom-in "-" xwidget-webkit-zoom-out " " xwidget-webkit-scroll-up [33554464] xwidget-webkit-scroll-down "" [remap scroll-up] xwidget-webkit-scroll-up-line [remap scroll-up-command] [remap scroll-down] xwidget-webkit-scroll-down-line [remap scroll-down-command] [remap forward-char] xwidget-webkit-scroll-forward [remap backward-char] xwidget-webkit-scroll-backward [remap right-char] [remap left-char] [remap previous-line] [remap next-line] [remap beginning-of-buffer] xwidget-webkit-scroll-top [remap end-of-buffer] xwidget-webkit-scroll-bottom] 5) (#$ . 2788))
#@35 Increase webkit view zoom factor.
(defalias 'xwidget-webkit-zoom-in #[0 "\300\301 \302\"\207" [xwidget-webkit-zoom xwidget-webkit-current-session 0.1] 3 (#$ . 4207) [nil (xwidget-webkit-mode)]])
#@35 Decrease webkit view zoom factor.
(defalias 'xwidget-webkit-zoom-out #[0 "\300\301 \302\"\207" [xwidget-webkit-zoom xwidget-webkit-current-session -0.1] 3 (#$ . 4408) [nil (xwidget-webkit-mode)]])
#@199 Scroll webkit up by ARG pixels; or full window height if no ARG.
Stop if bottom of page is reached.
Interactively, ARG is the prefix numeric argument.
Negative ARG scrolls down.

(fn &optional ARG)
(defalias 'xwidget-webkit-scroll-up #[256 "\300\301 \302\303\206
\304\305 !\"\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session format "window.scrollBy(0, %d);" xwidget-window-inside-pixel-height selected-window] 7 (#$ . 4612) ["P" (xwidget-webkit-mode)]])
#@196 Scroll webkit down by ARG pixels; or full window height if no ARG.
Stop if top of page is reached.
Interactively, ARG is the prefix numeric argument.
Negative ARG scrolls up.

(fn &optional ARG)
(defalias 'xwidget-webkit-scroll-down #[256 "\300\301 \302\303\206
\304\305 !\"\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session format "window.scrollBy(0, -%d);" xwidget-window-inside-pixel-height selected-window] 7 (#$ . 5095) ["P" (xwidget-webkit-mode)]])
#@203 Scroll webkit up by N lines.
The height of line is calculated with `window-font-height'.
Stop if the bottom edge of the page is reached.
If N is omitted or nil, scroll up by one line.

(fn &optional N)
(defalias 'xwidget-webkit-scroll-up-line #[256 "\300
\301 _!\207" [xwidget-webkit-scroll-up window-font-height] 4 (#$ . 5578) ["p" (xwidget-webkit-mode)]])
#@204 Scroll webkit down by N lines.
The height of line is calculated with `window-font-height'.
Stop if the top edge of the page is reached.
If N is omitted or nil, scroll down by one line.

(fn &optional N)
(defalias 'xwidget-webkit-scroll-down-line #[256 "\300
\301 _!\207" [xwidget-webkit-scroll-down window-font-height] 4 (#$ . 5943) ["p" (xwidget-webkit-mode)]])
#@169 Scroll webkit horizontally by N chars.
The width of char is calculated with `window-font-width'.
If N is omitted or nil, scroll forwards by one char.

(fn &optional N)
(defalias 'xwidget-webkit-scroll-forward #[256 "\300\301 \302\303\304 _\"\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session format "window.scrollBy(%d, 0);" window-font-width] 7 (#$ . 6313) ["p" (xwidget-webkit-mode)]])
#@162 Scroll webkit back by N chars.
The width of char is calculated with `window-font-width'.
If N is omitted or nil, scroll backwards by one char.

(fn &optional N)
(defalias 'xwidget-webkit-scroll-backward #[256 "\300\301 \302\303\304 _\"\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session format "window.scrollBy(-%d, 0);" window-font-width] 7 (#$ . 6728) ["p" (xwidget-webkit-mode)]])
#@32 Scroll webkit to the very top.
(defalias 'xwidget-webkit-scroll-top #[0 "\300\301 \302\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session "window.scrollTo(pageXOffset, 0);"] 3 (#$ . 7137) [nil (xwidget-webkit-mode)]])
#@35 Scroll webkit to the very bottom.
(defalias 'xwidget-webkit-scroll-bottom #[0 "\300\301 \302\"\207" [xwidget-webkit-execute-script xwidget-webkit-current-session "window.scrollTo(pageXOffset, window.document.body.scrollHeight);"] 3 (#$ . 7379) [nil (xwidget-webkit-mode)]])
(byte-code "\300\301 \302\303#\207" [define-key current-global-map [xwidget-event] xwidget-event-handler] 4)
#@38 Log MSG to a buffer.

(fn &rest MSG)
(defalias 'xwidget-log #[128 "\300\301!r\211q\210\302\303\"c\210\304c)\207" [get-buffer-create " *xwidget-log*" apply format "\n"] 5 (#$ . 7768)])
#@24 Receive xwidget event.
(defalias 'xwidget-event-handler #[0 "\301\302\"\210A@\3038\304
\305\"\211\"\207" [last-input-event xwidget-log "stuff happened to xwidget %S" 2 xwidget-get callback] 6 (#$ . 7959) [nil (xwidget-webkit-mode)]])
#@130 Callback for xwidgets.
XWIDGET instance, XWIDGET-EVENT-TYPE depends on the originating xwidget.

(fn XWIDGET XWIDGET-EVENT-TYPE)
(defalias 'xwidget-webkit-callback #[514 "\301\302!!\204\f\303\304!\207r\302!q\210\211\305\267\202c\306!\303\307\"\210\310\311\312\"\313\"\262
\202g\3148\315\316\"\205=\317\320\321\"\"\262
\202g\3148\3228\3238\324#\266\203\202g\3148\3228

!\266\202\202g\303\325\")\207" [last-input-event buffer-live-p xwidget-buffer xwidget-log "error: callback called for xwidget with dead buffer" #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (load-changed 24 decide-policy 44 download-callback 66 javascript-callback 85)) xwidget-webkit-title "webkit finished loading: %s" rename-buffer format "*xwidget webkit: %s *" t 3 string-match ".*#\\(.*\\)" xwidget-webkit-show-id-or-named-element match-string 1 4 5 xwidget-webkit-save-as-file "unhandled event:%s"] 9 (#$ . 8205)])
(byte-code "\301>\203\302\303\304\305\306DD\307\310\311\312\313&\210\302\207" [window-system (mac ns) custom-declare-variable xwidget-webkit-enable-plugins funcall function #[0 "\300\207" [nil] 1 ""] "Enable plugins for xwidget webkit.\nIf non-nil, plugins are enabled.  Otherwise, disabled." :type boolean :version "28.1"] 8)
(defvar xwidget-webkit-mode-hook nil)
(byte-code "\300\301N\204\f\302\300\301\303#\210\304\305!\204\302\305\306\307#\210\300\207" [xwidget-webkit-mode-hook variable-documentation put "Hook run after entering xwidget-webkit mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp xwidget-webkit-mode-map definition-name xwidget-webkit-mode] 4)
(defvar xwidget-webkit-mode-map (make-sparse-keymap))
(byte-code "\301\302N\204\303\301\302\304\305!#\210\306\307!\204\303\307\310\311#\210\312\313 !\210\307\302N\204-\303\307\302\304\314!#\210\306\300!\204B\303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P\303\300\302\304\320!#\210\303\311\321\322#\207" [xwidget-webkit-mode-abbrev-table xwidget-webkit-mode-map variable-documentation put purecopy "Keymap for `xwidget-webkit-mode'." boundp xwidget-webkit-mode-syntax-table definition-name xwidget-webkit-mode (lambda (#1=#:def-tmp-var) (defvar xwidget-webkit-mode-syntax-table #1#)) make-syntax-table "Syntax table for `xwidget-webkit-mode'." (lambda (#1#) (defvar xwidget-webkit-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `xwidget-webkit-mode'." derived-mode-parent special-mode] 5)
#@236 Xwidget webkit view mode.

In addition to any hooks its parent mode `special-mode' might have
run, this mode runs the hook `xwidget-webkit-mode-hook', as the final
or penultimate step during initialization.

\{xwidget-webkit-mode-map}
(defalias 'xwidget-webkit-mode #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315!\204'\316\317 \"\210\320\f!\211\2035\211\321 =\203;\322\f\323 \"\210\210\324
\325\"\204R
=\204R\326
\325C#\210\327!\210\330\f!\210
\307\306\331!\210\332\333 \210)\334\335!\207" [delay-mode-hooks major-mode mode-name xwidget-webkit-mode-map xwidget-webkit-mode-syntax-table xwidget-webkit-mode-abbrev-table make-local-variable t special-mode xwidget-webkit-mode "xwidget-webkit" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table bookmark-make-record-function xwidget-webkit-bookmark-make-record image-mode-setup-winprops run-mode-hooks xwidget-webkit-mode-hook local-abbrev-table buffer-read-only] 5 (#$ . 10758) nil])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable xwidget-webkit-download-dir funcall function #[0 "\300\207" ["~/Downloads/"] 1 ""] "Directory where download file saved." :version "28.1" :type file] 8)
#@320 For XWIDGET webkit, save URL of MIME-TYPE to location specified by user.
FILE-NAME combined with `xwidget-webkit-download-dir' is the default file name
of the prompt when reading.  When the file name the user specified is a
directory, URL is saved at the specified directory as FILE-NAME.

(fn URL MIME-TYPE FILE-NAME)
(defalias 'xwidget-webkit-save-as-file #[771 "\301\302\303#\205\304\"#\305
!\203\304\306!\"\262
\307
!\310\311#\207" [xwidget-webkit-download-dir read-file-name format "Save URL `%s' of type `%s' in file/directory: " expand-file-name file-directory-p file-name-nondirectory file-name-directory url-copy-file t] 9 (#$ . 12159)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable xwidget-webkit-bookmark-jump-new-session funcall function #[0 "\300\207" [nil] 1 ""] "Control bookmark jump to use new session or not.\nIf non-nil, use a new xwidget webkit session after bookmark jump.\nOtherwise, it will use `xwidget-webkit-last-session'.\nWhen you set this variable to nil, consider further customization with\n`xwidget-webkit-last-session-buffer'." :version "28.1" :type boolean] 8)
#@143 Create bookmark record in webkit xwidget.
See `xwidget-webkit-bookmark-jump-new-session' for whether this
should create a new session or not.
(defalias 'xwidget-webkit-bookmark-make-record #[0 "\300\301\211\"\302\303\304 !B\305B\244\207" [bookmark-make-record-default t page xwidget-webkit-uri xwidget-webkit-current-session ((handler lambda (bmk) (xwidget-webkit-browse-url (bookmark-prop-get bmk 'page) xwidget-webkit-bookmark-jump-new-session)))] 4 (#$ . 13318)])
(defvar xwidget-webkit-last-session-buffer nil)
#@29 Last active webkit, or nil.
(defalias 'xwidget-webkit-last-session #[0 "\301!\205rq\210\302e!)\207" [xwidget-webkit-last-session-buffer buffer-live-p xwidget-at] 2 (#$ . 13839)])
#@89 Either the webkit in the current buffer, or the last one used.
The latter might be nil.
(defalias 'xwidget-webkit-current-session #[0 "\300e!\206\301 \207" [xwidget-at xwidget-webkit-last-session] 2 (#$ . 14028)])
#@32 Resize XW to content.

(fn XW)
(defalias 'xwidget-adjust-size-to-content #[257 "\300
!\301@A@#\207" [xwidget-size-request xwidget-resize] 6 (#$ . 14250)])
#@43 Javascript that finds the active element.
(defvar xwidget-webkit-activeelement-js "\nfunction findactiveelement(doc){\n//alert(doc.activeElement.value);\n   if(doc.activeElement.value != undefined){\n      return doc.activeElement;\n   }else{\n        // recurse over the child documents:\n        var frames = doc.getElementsByTagName('frame');\n        for (var i = 0; i < frames.length; i++)\n        {\n                var d = frames[i].contentDocument;\n                 var rv = findactiveelement(d);\n                 if(rv != undefined){\n                    return rv;\n                 }\n        }\n    }\n    return undefined;\n};\n\n\n" (#$ . 14414))
#@67 Insert string into the active field in the current webkit widget.
(defalias 'xwidget-webkit-insert-string #[0 "\301 \302
\303P\304\305\"#\207" [xwidget-webkit-activeelement-js xwidget-webkit-current-session xwidget-webkit-execute-script "\n(function () {\n  var res = findactiveelement(document);\n  if (res)\n    return [res.value, res.type];\n})();" make-closure #[257 "\301
!\205=\211G\211\302=\205;
\303H\304H\211\305\267\266\202:\306\307\"\266\202\202;\310\311\312#\266\202\202;\313\300\"\266\202\202;\266\312\262
\314\300\315\316\"\"\207" [V0 vectorp 2 0 1 #s(hash-table size 3 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("text" 28 "password" 37 "textarea" 47)) read-string "Text: " read-passwd "Password: " nil xwidget-webkit-begin-edit-textarea xwidget-webkit-execute-script format "findactiveelement(document).value='%s'"] 8 "Prompt a string for the FIELD and insert in the active input.\n\n(fn FIELD)"]] 7 (#$ . 15084) [nil (xwidget-webkit-mode)]])
#@117 Start editing of a webkit text area.
XW is the xwidget identifier, TEXT is retrieved from the webkit.

(fn XW TEXT)
(defalias 'xwidget-webkit-begin-edit-textarea #[514 "\301\302\303!!\210\304\300!\210
\211c\207" [xwidget-xwbl switch-to-buffer generate-new-buffer "textarea" make-local-variable] 5 (#$ . 16089)])
#@36 End editing of a webkit text area.
(defalias 'xwidget-webkit-end-edit-textarea #[0 "eb\210\301\302\303\304#\203\305\306\303\304#\210\202\307\310\311ed{\"\"\207" [xwidget-xwbl search-forward "\n" nil t replace-match "\\n" xwidget-webkit-execute-script format "findactiveelement(document).value='%s'"] 6 (#$ . 16408) [nil (xwidget-webkit-mode)]])
#@185 Make webkit xwidget XW show a named element ELEMENT-SELECTOR.
The ELEMENT-SELECTOR must be a valid CSS selector.  For example,
use this to display an anchor.

(fn XW ELEMENT-SELECTOR)
(defalias 'xwidget-webkit-show-element #[514 "\300\301\302\"\"\207" [xwidget-webkit-execute-script format "\n(function (query) {\n  var el = document.querySelector(query);\n  if (el !== null) {\n    window.scrollTo(0, el.offsetTop);\n  }\n})('%s');"] 7 (#$ . 16765) [(byte-code "\300 \301\302!D\207" [xwidget-webkit-current-session read-string "Element selector: "] 3) (xwidget-webkit-mode)]])
#@125 Make webkit xwidget XW show a named element ELEMENT-NAME.
For example, use this to display an anchor.

(fn XW ELEMENT-NAME)
(defalias 'xwidget-webkit-show-named-element #[514 "\300\301\302\"\"\207" [xwidget-webkit-execute-script format "\n(function (query) {\n  var el = document.getElementsByName(query)[0];\n  if (el !== undefined) {\n    window.scrollTo(0, el.offsetTop);\n  }\n})('%s');"] 7 (#$ . 17352) [(byte-code "\300 \301\302!D\207" [xwidget-webkit-current-session read-string "Element name: "] 3) (xwidget-webkit-mode)]])
#@119 Make webkit xwidget XW show an id-element ELEMENT-ID.
For example, use this to display an anchor.

(fn XW ELEMENT-ID)
(defalias 'xwidget-webkit-show-id-element #[514 "\300\301\302\"\"\207" [xwidget-webkit-execute-script format "\n(function (query) {\n  var el = document.getElementById(query);\n  if (el !== null) {\n    window.scrollTo(0, el.offsetTop);\n  }\n})('%s');"] 7 (#$ . 17893) [(byte-code "\300 \301\302!D\207" [xwidget-webkit-current-session read-string "Element id: "] 3) (xwidget-webkit-mode)]])
#@126 Make webkit xwidget XW show a name or element id ELEMENT-ID.
For example, use this to display an anchor.

(fn XW ELEMENT-ID)
(defalias 'xwidget-webkit-show-id-or-named-element #[514 "\300\301\302\"\"\207" [xwidget-webkit-execute-script format "\n(function (query) {\n  var el = document.getElementById(query) ||\n           document.getElementsByName(query)[0];\n  if (el !== undefined) {\n    window.scrollTo(0, el.offsetTop);\n  }\n})('%s');"] 7 (#$ . 18412) [(byte-code "\300 \301\302!D\207" [xwidget-webkit-current-session read-string "Name or element id: "] 3) (xwidget-webkit-mode)]])
#@32 Adjust webkit to content size.
(defalias 'xwidget-webkit-adjust-size-to-content #[0 "\300\301 !\207" [xwidget-adjust-size-to-content xwidget-webkit-current-session] 2 (#$ . 19011) [nil (xwidget-webkit-mode)]])
#@32 Adjust size according to mode.
(defalias 'xwidget-webkit-adjust-size-dispatch #[0 "\300\301 !\210\3021
\303 0\207\210\304\207" [xwidget-webkit-adjust-size-to-window xwidget-webkit-current-session (error) recenter-top-bottom nil] 2 (#$ . 19227) [nil (xwidget-webkit-mode)]])
#@55 Return Emacs WINDOW body width in pixel.

(fn WINDOW)
(defalias 'xwidget-window-inside-pixel-width #[257 "\300
!\301
8
@Z\207" [window-inside-pixel-edges 2] 4 (#$ . 19508)])
#@56 Return Emacs WINDOW body height in pixel.

(fn WINDOW)
(defalias 'xwidget-window-inside-pixel-height #[257 "\300
!\301
8
A@Z\207" [window-inside-pixel-edges 3] 4 (#$ . 19688)])
#@89 Adjust the size of the webkit XWIDGET to fit the WINDOW.

(fn XWIDGET &optional WINDOW)
(defalias 'xwidget-webkit-adjust-size-to-window #[513 "\300\301!\302!#\207" [xwidget-resize xwidget-window-inside-pixel-width xwidget-window-inside-pixel-height] 7 (#$ . 19871)])
#@58 Manually set webkit size to width W, height H.

(fn W H)
(defalias 'xwidget-webkit-adjust-size #[514 "\300\301 #\207" [xwidget-resize xwidget-webkit-current-session] 6 (#$ . 20147) ["nWidth:\nnHeight:\n" (xwidget-webkit-mode)]])
#@41 Adjust width of webkit to window width.
(defalias 'xwidget-webkit-fit-width #[0 "\300\301\302 8\302 @Z\303\"\207" [xwidget-webkit-adjust-size 2 window-inside-pixel-edges 1000] 3 (#$ . 20384) [nil (xwidget-webkit-mode)]])
#@72 Adjust the size of the webkit widget in the given WINDOW.

(fn WINDOW)
(defalias 'xwidget-webkit-auto-adjust-size #[257 "r\301
!q\210\302=\205\303 \304
\"\262
)\207" [major-mode window-buffer xwidget-webkit-mode xwidget-webkit-current-session xwidget-webkit-adjust-size-to-window] 5 (#$ . 20611)])
#@76 Dynamically adjust webkit widget for all windows of the FRAME.

(fn FRAME)
(defalias 'xwidget-webkit-adjust-size-in-frame #[257 "\300\301\302#\207" [walk-windows xwidget-webkit-auto-adjust-size no-minibuf] 5 (#$ . 20919)])
(byte-code "\300\301\302\303\304\"\"\207" [eval-after-load xwidget-webkit-mode add-to-list window-size-change-functions xwidget-webkit-adjust-size-in-frame] 5)
#@75 Create a new webkit session buffer with URL.

(fn URL &optional CALLBACK)
(defalias 'xwidget-webkit-new-session #[513 "\301\302!
\206\303\304\305\306!!`c\210\307
\211G\\\310\311$\210\312
\313\314\315 !\316\315 !%\266\202\317
\320#\210\321 \210\322\323 \"\207" [xwidget-webkit-last-session-buffer generate-new-buffer-name "*xwidget-webkit*" xwidget-webkit-callback nil switch-to-buffer get-buffer-create put-text-property invisible t xwidget-insert webkit xwidget-window-inside-pixel-width selected-window xwidget-window-inside-pixel-height xwidget-put callback xwidget-webkit-mode xwidget-webkit-goto-uri xwidget-webkit-last-session] 13 (#$ . 21309)])
#@41 Goto URL with xwidget webkit.

(fn URL)
(defalias 'xwidget-webkit-goto-url #[257 "\300 \203\301\300 \"\207\302
!\207" [xwidget-webkit-current-session xwidget-webkit-goto-uri xwidget-webkit-new-session] 4 (#$ . 21979)])
#@51 Go back to previous URL in xwidget webkit buffer.
(defalias 'xwidget-webkit-back #[0 "\300\301 \302\"\207" [xwidget-webkit-goto-history xwidget-webkit-current-session -1] 3 (#$ . 22207) [nil (xwidget-webkit-mode)]])
#@24 Go forward in history.
(defalias 'xwidget-webkit-forward #[0 "\300\301 \302\"\207" [xwidget-webkit-goto-history xwidget-webkit-current-session 1] 3 (#$ . 22429) [nil (xwidget-webkit-mode)]])
#@21 Reload current URL.
(defalias 'xwidget-webkit-reload #[0 "\300\301 \302\"\207" [xwidget-webkit-goto-history xwidget-webkit-current-session 0] 3 (#$ . 22626) [nil (xwidget-webkit-mode)]])
#@73 Display the current xwidget webkit URL and place it on the `kill-ring'.
(defalias 'xwidget-webkit-current-url #[0 "\300\301 !\302\303\304\206\f\305!\"\207" [xwidget-webkit-uri xwidget-webkit-current-session message "URL: %s" kill-new ""] 5 (#$ . 22819) [nil (xwidget-webkit-mode)]])
#@58 Get the webkit selection and pass it to PROC.

(fn PROC)
(defalias 'xwidget-webkit-get-selection #[257 "\300\301 \302#\207" [xwidget-webkit-execute-script xwidget-webkit-current-session "window.getSelection().toString();"] 5 (#$ . 23110)])
#@57 Get the webkit selection and put it on the `kill-ring'.
(defalias 'xwidget-webkit-copy-selection-as-kill #[0 "\300\301!\207" [xwidget-webkit-get-selection kill-new] 2 (#$ . 23357) [nil (xwidget-webkit-mode)]])
#@151 Get an xwidget's property value.
XWIDGET is an xwidget, PROPNAME a property.
Returns the last value stored with `xwidget-put'.

(fn XWIDGET PROPNAME)
(defalias 'xwidget-get #[514 "\300\301!\"\207" [plist-get xwidget-plist] 5 (#$ . 23574)])
#@183 Set an xwidget's property value.
XWIDGET is an xwidget, PROPNAME a property to be set to specified VALUE.
You can retrieve the value with `xwidget-get'.

(fn XWIDGET PROPNAME VALUE)
(defalias 'xwidget-put #[771 "\300\301\302!#\"\207" [set-xwidget-plist plist-put xwidget-plist] 9 (#$ . 23823)])
#@31 Helper for `xwidget-cleanup'.
(defalias 'xwidget-delete-zombies #[0 "\211\205\"\211@\302\303!!\203\304
!	>\204\305
!\210
A\266\202\202
\207" [xwidget-view-list xwidget-list window-live-p xwidget-view-window xwidget-view-model delete-xwidget-view] 5 (#$ . 24129)])
#@25 Delete zombie xwidgets.
(defalias 'xwidget-cleanup #[0 "\300 \210\301 \207" [xwidget-delete-zombies redraw-display] 1 (#$ . 24407) nil])
#@48 Ask before killing a buffer that has xwidgets.
(defalias 'xwidget-kill-buffer-query-function #[0 "\300p!\211?\206\301\302\303\">?\206\304\305\306\307 \"!\207" [get-buffer-xwidgets t mapcar xwidget-query-on-exit-flag yes-or-no-p format "Buffer %S has xwidgets; kill it? " buffer-name] 5 (#$ . 24550)])
(byte-code "\300\301!\203\302\303\304\"\210\302\305\306\"\210\307\310!\207" [featurep xwidget-internal add-hook kill-buffer-query-functions xwidget-kill-buffer-query-function window-configuration-change-hook xwidget-delete-zombies provide xwidget] 3)