view src/gaim-send @ 12866:43d8af815a9d

[gaim-migrate @ 15217] Gaim::BuddyList::NodeFlags fits with the rest of the perl naming better than Gaim::BlistNodeFlags. Also some of the request api *_new functions now have default values so people can leave off the final parameter in the function call. Gaim::Request::Field::account_new("name", "label", undef) can now be Gaim::Request::Field::account_new("name", "label") for example. committer: Tailor Script <[e-mail]>

#!/bin/bash

METHOD_NAME=$1

if test -z "$METHOD_NAME" 
then
    cat <<EOF 
This program calls gaim API functions using DBus and prints the return value.
If you are not interested in the return value, use gaim-send-async.

Usage:

   $0 method-name type1:parameter1 type2:parameter2 ...

This shell script just invokes dbus-send, see man dbus-send for how 
to specify the parameters.  

Examples:

   $0 GaimAccountsFindConnected string: string:prpl-jabber
   $0 GaimAccountsGetAll
   $0 GaimCoreQuit

Use dbus-viewer to get the list of supported functions and their parameters.
EOF
    exit 1
fi

shift
dbus-send --dest=org.gaim.GaimService --print-reply --type=method_call /org/gaim/GaimObject org.gaim.GaimInterface.$METHOD_NAME "$@"

echo