From: jave <joakim@verona.se>
Date: Wed, 7 Jan 2015 15:12:04 +0000 (+0100)
Subject: Added two CHECK_STRING of arguments
X-Git-Tag: emacs-25.0.90~2607
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=66ae0ec9dd9f47117bc9c74b8458a11e465674d8;p=emacs.git

Added two CHECK_STRING of arguments

Suggested by Eli Zaretski
---

diff --git a/src/xwidget.c b/src/xwidget.c
index 94b5c8aa26b..fc4ec80bef9 100644
--- a/src/xwidget.c
+++ b/src/xwidget.c
@@ -1129,6 +1129,7 @@ DEFUN ("xwidget-webkit-goto-uri", Fxwidget_webkit_goto_uri,  Sxwidget_webkit_got
   (Lisp_Object xwidget, Lisp_Object uri)
 {
   WEBKIT_FN_INIT();
+  CHECK_STRING(uri);
   webkit_web_view_load_uri ( WEBKIT_WEB_VIEW(xw->widget_osr), SDATA(uri));
   return Qnil;
 }
@@ -1140,6 +1141,7 @@ DEFUN ("xwidget-webkit-execute-script", Fxwidget_webkit_execute_script,  Sxwidge
   (Lisp_Object xwidget, Lisp_Object script)
 {
   WEBKIT_FN_INIT();
+  CHECK_STRING(script);
   webkit_web_view_execute_script( WEBKIT_WEB_VIEW(xw->widget_osr), SDATA(script));
   return Qnil;
 }