summaryrefslogtreecommitdiffstats
path: root/kjsembed/jsobjectproxy_imp.cpp
diff options
context:
space:
mode:
authortoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
committertoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
commit90825e2392b2d70e43c7a25b8a3752299a933894 (patch)
treee33aa27f02b74604afbfd0ea4f1cfca8833d882a /kjsembed/jsobjectproxy_imp.cpp
downloadtdebindings-90825e2392b2d70e43c7a25b8a3752299a933894.tar.gz
tdebindings-90825e2392b2d70e43c7a25b8a3752299a933894.zip
Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.
BUG:215923 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdebindings@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'kjsembed/jsobjectproxy_imp.cpp')
-rw-r--r--kjsembed/jsobjectproxy_imp.cpp638
1 files changed, 638 insertions, 0 deletions
diff --git a/kjsembed/jsobjectproxy_imp.cpp b/kjsembed/jsobjectproxy_imp.cpp
new file mode 100644
index 00000000..a17190b5
--- /dev/null
+++ b/kjsembed/jsobjectproxy_imp.cpp
@@ -0,0 +1,638 @@
+/*
+ * Copyright (C) 2001-2003, Richard J. Moore <rich@kde.org>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public License
+ * along with this library; see the file COPYING.LIB. If not, write to
+ * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#include <qobject.h>
+#include <qobjectlist.h>
+#include <qdialog.h>
+#include <qlistbox.h>
+#include <qlistview.h>
+#include <qmetaobject.h>
+#include <qregexp.h>
+#include <qsignal.h>
+#include <qstrlist.h>
+#include <qtabwidget.h>
+#include <qtimer.h>
+#include <qvariant.h>
+
+#include <private/qucom_p.h>
+#include <private/qucomextra_p.h>
+
+#include <kjs/interpreter.h>
+#include <kjs/types.h>
+#include <kjs/ustring.h>
+
+#include "kjsembedpart.h"
+#include "jssecuritypolicy.h"
+
+#include "global.h"
+#include "jsfactory.h"
+#include "slotproxy.h"
+#include "slotutils.h"
+#include "jsobjectproxy.h"
+#include "jsobjectproxy_imp.h"
+
+using namespace KJS;
+
+namespace KJSEmbed {
+namespace Bindings {
+
+typedef JSProxy::MethodTable MethodTable;
+
+//
+// Factory methods that add the bindings.
+//
+
+void JSObjectProxyImp::addBindingsTree( KJS::ExecState *exec, KJS::Object &object, JSObjectProxy *proxy )
+{
+ MethodTable methods[] = {
+ { MethodParent, "parent" },
+ { MethodChildCount, "childCount" },
+ { MethodChild, "child" },
+ { MethodChildren, "children" },
+ { MethodIsWidgetType, "isWidgetType" },
+ { MethodClassName, "className" },
+ { MethodSuperClassName, "superClassName" },
+ { 0, 0 }
+ };
+
+ int i = 0;
+ do {
+ JSObjectProxyImp *obj = new JSObjectProxyImp( exec, methods[i].id, proxy );
+ obj->setName( KJS::Identifier( methods[i].name ) );
+ object.put( exec, methods[i].name, KJS::Object(obj) );
+ i++;
+ } while( methods[i].id );
+}
+
+void JSObjectProxyImp::addBindingsDOM( KJS::ExecState *exec, KJS::Object &object, JSObjectProxy *proxy )
+{
+ MethodTable methods[] = {
+ { MethodGetParentNode, "getParentNode" },
+ { MethodGetElementById, "getElementById" },
+ { MethodHasAttribute, "hasAttribute" },
+ { MethodGetAttribute, "getAttribute" },
+ { MethodSetAttribute, "setAttribute" },
+ { 0, 0 }
+ };
+
+ int i = 0;
+ do {
+ JSObjectProxyImp *obj = new JSObjectProxyImp( exec, methods[i].id, proxy );
+ obj->setName( KJS::Identifier( methods[i].name ) );
+ object.put( exec, methods[i].name, KJS::Object(obj) );
+ i++;
+ } while( methods[i].id );
+}
+
+void JSObjectProxyImp::addBindingsConnect( KJS::ExecState *exec, KJS::Object &object, JSObjectProxy *proxy )
+{
+ MethodTable methods[] = {
+ { MethodConnect, "connect" },
+ { MethodDisconnect, "disconnect" },
+ { MethodSignals, "signals" },
+ { MethodSlots, "slots" },
+ { 0, 0 }
+ };
+
+ int i = 0;
+ do {
+ JSObjectProxyImp *obj = new JSObjectProxyImp( exec, methods[i].id, proxy );
+ obj->setName( KJS::Identifier( methods[i].name ) );
+ object.put( exec, methods[i].name, KJS::Object(obj) );
+ i++;
+ } while( methods[i].id );
+}
+
+//
+// The real implementation
+//
+
+JSObjectProxyImp::JSObjectProxyImp( KJS::ExecState *exec, int mid, JSObjectProxy *parent )
+ : JSProxyImp(exec), id(mid), proxy(parent), obj(parent->obj)
+{
+}
+
+JSObjectProxyImp::JSObjectProxyImp( KJS::ExecState *exec,
+ int mid, const QCString &name, JSObjectProxy *parent )
+ : JSProxyImp(exec), id(mid), slotname(name), proxy(parent), obj(parent->obj)
+{
+}
+
+JSObjectProxyImp::JSObjectProxyImp( KJS::ExecState *exec,
+ int mid, int sid, const QCString &name, JSObjectProxy *parent )
+ : JSProxyImp(exec), id(mid), sigid(sid), slotname(name), proxy(parent), obj(parent->obj)
+{
+}
+
+JSObjectProxyImp::JSObjectProxyImp( KJS::ExecState *exec,
+ int mid, const char *ret, int sid, const QCString &name,
+ JSObjectProxy *parent )
+ : JSProxyImp(exec), id(mid), rettype(ret), sigid(sid), slotname(name), proxy(parent), obj(parent->obj)
+{
+}
+
+//
+// Custom methods.
+//
+
+KJS::Value JSObjectProxyImp::children( KJS::ExecState *exec, KJS::Object &, const KJS::List & )
+{
+ KJS::List items;
+ const QObjectList *kids = obj->children();
+ if ( kids ) {
+ QObjectList l( *kids );
+
+ for ( uint i = 0 ; i < l.count() ; i++ ) {
+ QObject *child = l.at( i );
+ QCString nm = ( child ? child->name() : "<null>" );
+ items.append( KJS::String( QString(nm) ) );
+ }
+ }
+
+ return KJS::Object( proxy->js->builtinArray().construct( exec, items ) );
+}
+
+KJS::Value JSObjectProxyImp::properties( KJS::ExecState *exec, KJS::Object &, const KJS::List & )
+{
+ KJS::List items;
+ QMetaObject *mo = obj->metaObject();
+ QStrList propList( mo->propertyNames( true ) );
+
+ for ( QStrListIterator iter(propList); iter.current(); ++iter ) {
+
+ QCString name = iter.current();
+ int propid = mo->findProperty( name.data(), true );
+ if ( propid != -1 ) {
+ items.append( KJS::String( QString(name) ) );
+ }
+ }
+
+ return KJS::Object( proxy->js->builtinArray().construct( exec, items ) );
+}
+
+KJS::Value JSObjectProxyImp::callCustomSlot( KJS::ExecState *, KJS::Object &, const KJS::List & )
+{
+ return KJS::Null();
+}
+
+//
+// Invoke a slot or method.
+//
+
+KJS::Value JSObjectProxyImp::callSlot( KJS::ExecState *exec, KJS::Object &self, const KJS::List &args )
+{
+ return JSSlotUtils::invokeSlot( exec, self, args, this );
+}
+
+KJS::Value JSObjectProxyImp::call( KJS::ExecState *exec, KJS::Object &self, const KJS::List &args )
+{
+ if ( !proxy->isAllowed(exec->interpreter()) ) {
+ kdWarning() << "JSObjectProxy::Method call from unknown interpreter!" << endl;
+ return KJS::Null();
+ }
+
+ if (obj.isNull()) {
+ kdWarning() << "JSObjectProxy::Method call on null object"<<endl;
+ return KJS::Null();
+ }
+
+ switch( id ) {
+ case MethodParent:
+ {
+ QObject *po = obj->parent();
+ if ( po && proxy->securityPolicy()->isObjectAllowed( proxy, po ) )
+ return proxy->part()->factory()->createProxy( exec, po, proxy );
+
+ return KJS::Null();
+ }
+ break;
+ case MethodChildCount:
+ {
+ const QObjectList *kids = obj->children();
+ return kids ? KJS::Number( kids->count() ) : KJS::Number(0);
+ }
+ break;
+ case MethodIsWidgetType:
+ {
+ return KJS::Boolean( obj->isWidgetType() );
+ }
+ break;
+ case MethodClassName:
+ {
+ return KJS::String( obj->className() );
+ }
+ break;
+ case MethodSuperClassName:
+ {
+ return KJS::String( obj->metaObject()->superClassName() );
+ }
+ break;
+ case MethodChildren:
+ return children( exec, self, args );
+ break;
+ case MethodProps:
+ return properties( exec, self, args );
+ break;
+ case MethodSlot:
+ return callSlot( exec, self, args );
+ break;
+ case MethodChild:
+ case MethodGetElementById:
+ return getElementById( exec, self, args );
+ break;
+ case MethodGetParentNode:
+ return getParentNode( exec, self, args );
+ break;
+ case MethodHasAttribute:
+ return hasAttribute( exec, self, args );
+ break;
+ case MethodGetAttribute:
+ return getAttribute( exec, self, args );
+ break;
+ case MethodSetAttribute:
+ return setAttribute( exec, self, args );
+ break;
+ case MethodGetElementsByTagName:
+ return getElementsByTagName( exec, self, args );
+ break;
+ case MethodSignals:
+ return signalz( exec, self, args );
+ break;
+ case MethodSlots:
+ return slotz( exec, self, args );
+ break;
+ case MethodConnect:
+ return connect( exec, self, args );
+ case MethodDisconnect:
+ return disconnect( exec, self, args );
+ default:
+ break;
+ }
+
+ return ObjectImp::call( exec, self, args );
+}
+
+//
+// Connections
+//
+
+KJS::Value JSObjectProxyImp::signalz( KJS::ExecState *exec, KJS::Object &, const KJS::List & )
+{
+ KJS::List items;
+ QMetaObject *mo = obj->metaObject();
+ QStrList signalList( mo->signalNames( true ) );
+
+ for ( QStrListIterator iter(signalList); iter.current(); ++iter ) {
+
+ QCString name = iter.current();
+ QString nm( name );
+
+ int signalid = mo->findSignal( name.data(), true );
+ if ( (signalid != -1) && (mo->signal( signalid, true )->access == QMetaData::Public) )
+ items.append( KJS::String(nm) );
+ }
+
+ return KJS::Object( proxy->js->builtinArray().construct( exec, items ) );
+}
+
+KJS::Value JSObjectProxyImp::slotz( KJS::ExecState *exec, KJS::Object &, const KJS::List & )
+{
+ KJS::List items;
+ QMetaObject *mo = obj->metaObject();
+ QStrList slotList( mo->slotNames( true ) );
+
+ for ( QStrListIterator iter(slotList); iter.current(); ++iter ) {
+
+ QCString name = iter.current();
+ QString nm( name );
+
+ int slotid = mo->findSlot( name.data(), true );
+ if ( (slotid != -1) && (mo->slot( slotid, true )->access == QMetaData::Public) )
+ items.append( KJS::String(nm) );
+ }
+
+ return KJS::Object( proxy->js->builtinArray().construct( exec, items ) );
+}
+
+KJS::Boolean JSObjectProxyImp::connect( KJS::ExecState *exec,
+ const KJS::Object &self, const KJS::List &args )
+{
+ // connect sender, sig, slot
+ // connect sender, sig, recv, method
+
+ if ( (args.size() != 3) && (args.size() != 4) )
+ return KJS::Boolean(false);
+
+ // Source object and signal
+ JSObjectProxy *sendproxy = JSProxy::toObjectProxy( args[0].imp() );
+ QObject *sender = sendproxy ? sendproxy->object() : 0;
+ QString sig = args[1].toString(exec).qstring();
+ kdDebug( 80001 ) << "connecting C++ signal" << sig << endl;
+ // Receiver and slot/signal
+ KJS::Object recvObj;
+ QString dest;
+ if ( args.size() == 3 ) {
+ recvObj = self.toObject(exec);
+ dest = args[2].toString(exec).qstring();
+ }
+ else if ( args.size() == 4 ) {
+ recvObj = args[2].toObject(exec);
+ dest = args[3].toString(exec).qstring();
+ }
+
+ // Try to connect to C++ slot
+ JSObjectProxy *recvproxy = JSProxy::toObjectProxy( recvObj.imp() );
+ if ( recvproxy ) {
+ QObject *recv = recvproxy ? recvproxy->object() : 0;
+ bool ok = JSSlotUtils::connect( sender, sig.ascii(), recv, dest.ascii() );
+ if ( ok )
+ return KJS::Boolean(true);
+ }
+
+ return connect( sender, sig.ascii(), recvObj, dest );
+}
+
+KJS::Boolean JSObjectProxyImp::connect( QObject *sender, const char *sig,
+ const KJS::Object &recv, const QString &dest )
+{
+ kdDebug(80001) << "Trying signature '" << sig << "'." << endl;
+ // Try to connect to JS method
+ JSSlotProxy *slotp = new JSSlotProxy( sender );
+ slotp->setInterpreter( proxy->interpreter() );
+ slotp->setProxy( proxy );
+ slotp->setObject( recv );
+ slotp->setMethod( dest );
+
+ int id = JSSlotUtils::findSignature( sig );
+ if ( id == JSSlotUtils::SignatureNotSupported ) {
+ kdWarning(80001) << "Connect with unknown signature '" << sig << "' failed" << endl;
+ return KJS::Boolean( false );
+ }
+
+ bool ok;
+ switch ( id ) {
+ case JSSlotUtils::SignatureNone:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_void()" );
+ break;
+ case JSSlotUtils::SignatureInt:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_int(int)" );
+ break;
+ case JSSlotUtils::SignatureUInt:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_uint(uint)" );
+ break;
+ case JSSlotUtils::SignatureLong:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_long(long)" );
+ break;
+ case JSSlotUtils::SignatureULong:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_ulong(ulong)" );
+ break;
+ case JSSlotUtils::SignatureBool:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_bool(bool)" );
+ break;
+ case JSSlotUtils::SignatureDouble:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_double(double)" );
+ break;
+ case JSSlotUtils::SignatureString:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_string(const QString&)" );
+ break;
+ case JSSlotUtils::SignatureCString:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_charstar(const char*)" );
+ break;
+ case JSSlotUtils::SignatureColor:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_color(const QColor&)" );
+ break;
+ case JSSlotUtils::SignatureFont:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_font(const QFont&)" );
+ break;
+ case JSSlotUtils::SignaturePoint:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_point(const QPoint&)" );
+ break;
+ case JSSlotUtils::SignatureRect:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_rect(const QRect&)" );
+ break;
+ case JSSlotUtils::SignatureSize:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_size(const QSize&)" );
+ break;
+ case JSSlotUtils::SignaturePixmap:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_pixmap(const QPixmap&)" );
+ break;
+ case JSSlotUtils::SignatureURL:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_url(const KURL&)" );
+ break;
+ case JSSlotUtils::SignatureIntInt:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_intint(int, int)" );
+ break;
+ case JSSlotUtils::SignatureIntBool:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_intbool(int, bool)" );
+ break;
+ case JSSlotUtils::SignatureIntIntIntInt:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_intintint(int, int, int)" );
+ break;
+
+ case JSSlotUtils::SignatureDate:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_date(const QDate&)" );
+ break;
+ case JSSlotUtils::SignatureTime:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_time(const QTime&)" );
+ break;
+ case JSSlotUtils::SignatureDateTime:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_datetime(const QDateTime&)" );
+ break;
+ case JSSlotUtils::SignatureImage:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_image(const QImage&)" );
+ break;
+ case JSSlotUtils::SignatureQWidget:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_widget(QWidget*)" );
+ break;
+ case JSSlotUtils::SignatureDateDate:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_datedate(const QDate&, const QDate& )" );
+ break;
+ case JSSlotUtils::SignatureColorString:
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_colorstring(const QColor&, const QString&)" );
+ break;
+ case JSSlotUtils::SignatureCustom:
+ {
+ QString mangledSig = sig;
+ mangledSig.remove(' ')
+ .remove("const")
+ .remove('&')
+ .remove('*');
+ mangledSig = mangledSig.lower();
+
+ kdDebug(80001) << "Custom slot signature: " << mangledSig << endl;
+ break;
+ }
+ default:
+ kdWarning(80001) << "Unsupported signature '" << sig << "' connected with no args" << endl;
+ ok = JSSlotUtils::connect( sender, sig, slotp, "slot_none()" );
+ break;
+ }
+
+ if ( !ok ) {
+ kdDebug(80001) << "Error connecting '" << sig << "'" << endl;
+ }
+
+ return KJS::Boolean(ok);
+}
+
+KJS::Boolean JSObjectProxyImp::disconnect( KJS::ExecState *exec, KJS::Object &self, const KJS::List &args )
+{
+ // disconnect sender, sig, slot
+ // disconnect sender, sig, recv, method
+
+ if ( (args.size() != 3) && (args.size() != 4) )
+ return KJS::Boolean(false);
+
+ // Source object and signal
+ JSObjectProxy *sendproxy = JSProxy::toObjectProxy( args[0].imp() );
+ QObject *sender = sendproxy ? sendproxy->object() : 0;
+ QString sig = args[1].toString(exec).qstring();
+
+ // Receiver and slot/signal
+ QObject *recv=0;
+ QString dest;
+ if ( args.size() == 3 ) {
+ JSObjectProxy *recvproxy = JSProxy::toObjectProxy( self.imp() );
+ recv = recvproxy ? recvproxy->object() : 0;
+ dest = args[2].toString(exec).qstring();
+ }
+ else if ( args.size() == 4 ) {
+ JSObjectProxy *recvproxy = JSProxy::toObjectProxy( args[2].imp() );
+ recv = recvproxy ? recvproxy->object() : 0;
+ dest = args[3].toString(exec).qstring();
+ }
+
+ return JSSlotUtils::disconnect( exec, self, sender, sig.ascii(), recv, dest.ascii() );
+}
+
+//
+// DOM methods
+//
+
+KJS::Value JSObjectProxyImp::getParentNode( KJS::ExecState *exec, KJS::Object &, const KJS::List &args )
+{
+ if ( args.size())
+ return KJS::Null();
+
+ QObject *parent = obj->parent();
+ if ( parent && proxy->securityPolicy()->isObjectAllowed( proxy, parent ) )
+ return proxy->part()->factory()->createProxy( exec, parent, proxy );
+
+ return KJS::Null();
+}
+
+KJS::Value JSObjectProxyImp::getElementById( KJS::ExecState *exec, KJS::Object &, const KJS::List &args )
+{
+ if ( !args.size() )
+ return KJS::Null();
+
+ const QObjectList *kids = obj->children();
+ if ( !kids )
+ return KJS::Null();
+
+ QObjectList l( *kids );
+ QObject *child = 0;
+
+ if ( args[0].isA( KJS::NumberType ) ) {
+ uint i = args[0].toUInt32( exec );
+
+ if ( i >= l.count() )
+ return KJS::Null();
+
+ child = l.at( i );
+ }
+ else {
+ QString s = args[0].toString( exec ).qstring();
+ child = obj->child( s.ascii() );
+ }
+
+ if ( child && proxy->securityPolicy()->isObjectAllowed( proxy, child ) ) {
+ kdDebug(80001) << "Creating subproxy for child " << child->className() << endl;
+ return proxy->part()->factory()->createProxy( exec, child, proxy );
+ }
+
+ return KJS::Null();
+}
+
+KJS::Value JSObjectProxyImp::getElementsByTagName( KJS::ExecState *, KJS::Object &, const KJS::List & )
+{
+ return KJS::Null();
+}
+
+KJS::Value JSObjectProxyImp::hasAttribute( KJS::ExecState *exec, KJS::Object &, const KJS::List &args )
+{
+ if ( !args.size() )
+ return KJS::Null();
+
+ QMetaObject *meta = obj->metaObject();
+ QString s = args[0].toString(exec).qstring();
+ if ( meta->findProperty( s.ascii(), true ) != -1 )
+ return KJS::Boolean(true);
+ else
+ return KJS::Boolean(false);
+}
+
+KJS::Value JSObjectProxyImp::getAttribute( KJS::ExecState *exec, KJS::Object &, const KJS::List &args )
+{
+ if ( !args.size() )
+ {
+ QString msg = i18n( "No property was defined." );
+ return throwError(exec, msg);
+ }
+
+ QMetaObject *meta = obj->metaObject();
+ QString s = args[0].toString(exec).qstring();
+ kdDebug(80001) << "Get property " << s << " from " << obj->name() << endl;
+ if ( meta->findProperty( s.ascii(), true ) == -1 )
+ {
+ QString msg = i18n( "Property '%1' could not be found." ).arg( s );
+ return throwError(exec, msg,KJS::ReferenceError);
+ }
+
+ QVariant val = obj->property( s.ascii() );
+ return convertToValue( exec, val );
+}
+
+KJS::Value JSObjectProxyImp::setAttribute( KJS::ExecState *exec, KJS::Object &, const KJS::List &args )
+{
+ if ( args.size() != 2 )
+ return KJS::Boolean(false);
+
+ QMetaObject *meta = obj->metaObject();
+ QString s = args[0].toString(exec).qstring();
+
+ if ( meta->findProperty( s.ascii(), true ) == -1 )
+ {
+ QString msg = i18n( "Property '%1' could not be found." ).arg( s );
+ return throwError(exec, msg,KJS::GeneralError);
+ }
+ kdDebug(80001) << "Set property " << s << " from " << obj->name() << endl;
+ QVariant val = convertToVariant( exec, args[1] );
+ bool ok = obj->setProperty( s.ascii(), val );
+
+ return KJS::Boolean(ok);
+}
+
+} // namespace KJSEmbed::Bindings
+} // namespace KJSEmbed
+
+// Local Variables:
+// c-basic-offset: 4
+// End:
+