diff options
| author | Eli Zaretskii | 2024-04-29 15:32:12 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2024-04-29 15:32:12 +0300 |
| commit | f6ae5939b950bdec86471b02e81d1b3827546a2d (patch) | |
| tree | af02f8074ca9e211304841892640abb655a9e0ff /lisp/net | |
| parent | 3be382311fa03b9ec9c571b5e5737ff2d51bc2d3 (diff) | |
| download | emacs-f6ae5939b950bdec86471b02e81d1b3827546a2d.tar.gz emacs-f6ae5939b950bdec86471b02e81d1b3827546a2d.zip | |
; Fix documentation of recent commits.
* lisp/touch-screen.el (touch-screen-handle-point-up): Fix
comments.
* lisp/net/eww.el (eww-check-text-conversion, eww-select-file)
(eww-toggle-checkbox, eww-submit): Doc fixes.
* doc/emacs/input.texi (On-Screen Keyboards): Fix punctuation and
wording.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/eww.el | 18 |
1 files changed, 11 insertions, 7 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 4bb491b9970..5a138dcc46a 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -1304,10 +1304,11 @@ This consults the entries in `eww-readable-urls' (which see)." | |||
| 1304 | 1304 | ||
| 1305 | (defun eww-check-text-conversion () | 1305 | (defun eww-check-text-conversion () |
| 1306 | "Check if point is within a field and toggle text conversion. | 1306 | "Check if point is within a field and toggle text conversion. |
| 1307 | If `text-conversion-style' is not `action' if point is within the | 1307 | Set `text-conversion-style' to the value `action' if it isn't |
| 1308 | prompt or `nil' otherwise, set it to such a value, so as to | 1308 | already and point is within the prompt field, or if |
| 1309 | guarantee that the input method functions properly for the | 1309 | `text-conversion-style' is `nil', so as to guarantee that |
| 1310 | purpose of typing within the ERC prompt." | 1310 | the input method functions properly for the purpose of typing |
| 1311 | within the ERC prompt." | ||
| 1311 | (when (and (eq major-mode 'eww-mode) | 1312 | (when (and (eq major-mode 'eww-mode) |
| 1312 | (fboundp 'set-text-conversion-style)) | 1313 | (fboundp 'set-text-conversion-style)) |
| 1313 | (if (eq (car-safe (get-text-property (point) 'field)) | 1314 | (if (eq (car-safe (get-text-property (point) 'field)) |
| @@ -1649,7 +1650,8 @@ just re-display the HTML already fetched." | |||
| 1649 | 1650 | ||
| 1650 | (defun eww-select-file (&optional event) | 1651 | (defun eww-select-file (&optional event) |
| 1651 | "Change the value of the upload file menu under point. | 1652 | "Change the value of the upload file menu under point. |
| 1652 | EVENT, if non-nil, is the mouse event that preceded this command." | 1653 | EVENT, if non-nil, is the mouse event that preceded this command. |
| 1654 | Interactively, EVENT is the value of `last-nonmenu-event'." | ||
| 1653 | (interactive (list last-nonmenu-event) eww-mode) | 1655 | (interactive (list last-nonmenu-event) eww-mode) |
| 1654 | (when (and event (setq event (event-start event))) | 1656 | (when (and event (setq event (event-start event))) |
| 1655 | (goto-char (posn-point event))) | 1657 | (goto-char (posn-point event))) |
| @@ -1904,7 +1906,8 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.") | |||
| 1904 | 1906 | ||
| 1905 | (defun eww-toggle-checkbox (&optional event) | 1907 | (defun eww-toggle-checkbox (&optional event) |
| 1906 | "Toggle the value of the checkbox under point. | 1908 | "Toggle the value of the checkbox under point. |
| 1907 | EVENT, if non-nil, is the mouse event that preceded this command." | 1909 | EVENT, if non-nil, is the mouse event that preceded this command. |
| 1910 | Interactively, EVENT is the value of `last-nonmenu-event'." | ||
| 1908 | (interactive (list last-nonmenu-event) eww-mode) | 1911 | (interactive (list last-nonmenu-event) eww-mode) |
| 1909 | (when (and event (setq event (event-start event))) | 1912 | (when (and event (setq event (event-start event))) |
| 1910 | (goto-char (posn-point event))) | 1913 | (goto-char (posn-point event))) |
| @@ -1977,7 +1980,8 @@ EVENT, if non-nil, is the mouse event that preceded this command." | |||
| 1977 | 1980 | ||
| 1978 | (defun eww-submit (&optional event) | 1981 | (defun eww-submit (&optional event) |
| 1979 | "Submit the form under point or EVENT. | 1982 | "Submit the form under point or EVENT. |
| 1980 | EVENT, if non-nil, is the mouse event that preceded this command." | 1983 | EVENT, if non-nil, is the mouse event that preceded this command. |
| 1984 | Interactively, EVENT is the value of `last-nonmenu-event'." | ||
| 1981 | (interactive (list last-nonmenu-event) eww-mode) | 1985 | (interactive (list last-nonmenu-event) eww-mode) |
| 1982 | (when (and event (setq event (event-start event))) | 1986 | (when (and event (setq event (event-start event))) |
| 1983 | (goto-char (posn-point event))) | 1987 | (goto-char (posn-point event))) |