diff options
| -rw-r--r-- | README.xwidget | 4 | ||||
| -rw-r--r-- | lisp/xwidget.el | 8 |
2 files changed, 10 insertions, 2 deletions
diff --git a/README.xwidget b/README.xwidget index 0957c9136eb..2fdec89deb4 100644 --- a/README.xwidget +++ b/README.xwidget | |||
| @@ -1495,3 +1495,7 @@ http://test | |||
| 1495 | hook so anything can filter browser history. | 1495 | hook so anything can filter browser history. |
| 1496 | ** TODO new relative url code sometimes fail | 1496 | ** TODO new relative url code sometimes fail |
| 1497 | http://www.dilbert.com | 1497 | http://www.dilbert.com |
| 1498 | ** TODO input field enhancements | ||
| 1499 | - password field | ||
| 1500 | - textarea | ||
| 1501 | |||
diff --git a/lisp/xwidget.el b/lisp/xwidget.el index 71b3de5ff38..3f20914f88c 100644 --- a/lisp/xwidget.el +++ b/lisp/xwidget.el | |||
| @@ -249,9 +249,13 @@ Argument STR string." | |||
| 249 | (field-value | 249 | (field-value |
| 250 | (progn | 250 | (progn |
| 251 | (xwidget-webkit-execute-script xww xwidget-webkit-activeelement-js) | 251 | (xwidget-webkit-execute-script xww xwidget-webkit-activeelement-js) |
| 252 | (xwidget-webkit-execute-script-rv xww "findactiveelement(document).value;" )))) | 252 | (xwidget-webkit-execute-script-rv xww "findactiveelement(document).value;" ))) |
| 253 | (field-type (xwidget-webkit-execute-script-rv xww "findactiveelement(document).type;" ))) | ||
| 253 | (list xww | 254 | (list xww |
| 254 | (read-string "string:" field-value)))) | 255 | (cond ( (equal "text" field-type) (read-string "text:" field-value)) |
| 256 | ( (equal "password" field-type) (read-passwd "password:" nil field-value)) | ||
| 257 | ( (equal "textarea" field-type) (read-textarea "textarea:" field-value)) | ||
| 258 | )))) | ||
| 255 | (xwidget-webkit-execute-script xw (format "findactiveelement(document).value='%s'" str))) | 259 | (xwidget-webkit-execute-script xw (format "findactiveelement(document).value='%s'" str))) |
| 256 | 260 | ||
| 257 | 261 | ||