aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJoakim Verona2016-04-02 17:49:27 -0700
committerPaul Eggert2016-04-02 18:32:13 -0700
commit36e05f0bf713175a06d14255cf707543ad1a296e (patch)
tree14faa853d85acf9ee5c99e0adf275e3b1d150969 /src
parent104221731eb0e24bd6ec4c9e63f4f7590fd07c97 (diff)
downloademacs-36e05f0bf713175a06d14255cf707543ad1a296e.tar.gz
emacs-36e05f0bf713175a06d14255cf707543ad1a296e.zip
Remove unused arguments from make-xwidget
The arguments BEG and END were unused, and are now removed. * display.texi (Xwidgets): Document the change * xwidget.el (make-xwidget, xwidget-insert) (xwidget-webkit-new-session): Reflect changed arguments * xwidget.c (Fmake_xwidget, syms_of_xwidget): Reflect changed arguments
Diffstat (limited to 'src')
-rw-r--r--src/xwidget.c16
1 files changed, 6 insertions, 10 deletions
diff --git a/src/xwidget.c b/src/xwidget.c
index c24475f5312..4f1df1aabdf 100644
--- a/src/xwidget.c
+++ b/src/xwidget.c
@@ -156,27 +156,23 @@ webkit_navigation_policy_decision_requested_cb (WebKitWebView *,
156 156
157DEFUN ("make-xwidget", 157DEFUN ("make-xwidget",
158 Fmake_xwidget, Smake_xwidget, 158 Fmake_xwidget, Smake_xwidget,
159 7, 8, 0, 159 5, 6, 0,
160 doc: /* Make an xwidget from BEG to END of TYPE. 160 doc: /* Make an xwidget of TYPE.
161If BUFFER is nil, use the current buffer. 161If BUFFER is nil, use the current buffer.
162If BUFFER is a string and no such buffer exists, create it. 162If BUFFER is a string and no such buffer exists, create it.
163TYPE is a symbol which can take one of the following values: 163TYPE is a symbol which can take one of the following values:
164 164
165- webkit-osr 165- webkit
166 166
167Returns the newly constructed xwidget, or nil if construction fails. */) 167Returns the newly constructed xwidget, or nil if construction fails. */)
168 (Lisp_Object beg, Lisp_Object end, Lisp_Object type, 168 (Lisp_Object type,
169 Lisp_Object title, Lisp_Object width, Lisp_Object height, 169 Lisp_Object title, Lisp_Object width, Lisp_Object height,
170 Lisp_Object arguments, Lisp_Object buffer) 170 Lisp_Object arguments, Lisp_Object buffer)
171{ 171{
172 CHECK_SYMBOL (type); 172 CHECK_SYMBOL (type);
173 CHECK_NATNUM (width); 173 CHECK_NATNUM (width);
174 CHECK_NATNUM (height); 174 CHECK_NATNUM (height);
175 /* This should work a bit like "make-button" 175
176 (make-button BEG END &rest PROPERTIES)
177 TYPE etc. should be keyword args eventually.
178 (make-xwidget 3 3 'button "oei" 31 31 nil)
179 (xwidget-info (car xwidget-list)) */
180 struct xwidget *xw = allocate_xwidget (); 176 struct xwidget *xw = allocate_xwidget ();
181 Lisp_Object val; 177 Lisp_Object val;
182 xw->type = type; 178 xw->type = type;
@@ -987,7 +983,7 @@ syms_of_xwidget (void)
987 defsubr (&Sxwidget_webkit_goto_uri); 983 defsubr (&Sxwidget_webkit_goto_uri);
988 defsubr (&Sxwidget_webkit_execute_script); 984 defsubr (&Sxwidget_webkit_execute_script);
989 defsubr (&Sxwidget_webkit_get_title); 985 defsubr (&Sxwidget_webkit_get_title);
990 DEFSYM (Qwebkit_osr, "webkit-osr"); 986 DEFSYM (Qwebkit_osr, "webkit");
991 987
992 defsubr (&Sxwidget_size_request); 988 defsubr (&Sxwidget_size_request);
993 defsubr (&Sdelete_xwidget_view); 989 defsubr (&Sdelete_xwidget_view);