/*
- * $Id: rb_evas.c 354 2006-02-10 18:14:08Z tilman $
+ * $Id: rb_evas.c 382 2006-05-25 09:20:31Z tilman $
*
* Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
*
{
GET_OBJ (self, RbEvas, e);
- Check_Type (path, T_STRING);
-
evas_font_path_append (e->real, StringValuePtr (path));
return Qnil;
{
GET_OBJ (self, RbEvas, e);
- Check_Type (path, T_STRING);
-
evas_font_path_append (e->real, StringValuePtr (path));
return Qnil;
GET_OBJ (self, RbEvas, e);
- Check_Type (name, T_STRING);
-
if (!(o = evas_object_name_find (e->real, StringValuePtr (name))))
return Qnil;
/*
- * $Id: rb_evas_object.c 369 2006-02-15 18:09:44Z tilman $
+ * $Id: rb_evas_object.c 382 2006-05-25 09:20:31Z tilman $
*
* Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
*
{
GET_OBJ (self, RbEvasObject, e);
- Check_Type (val, T_STRING);
-
evas_object_name_set (e->real, StringValuePtr (val));
return Qnil;
/*
- * $Id: rb_image.c 376 2006-02-25 10:10:31Z tilman $
+ * $Id: rb_image.c 382 2006-05-25 09:20:31Z tilman $
*
* Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
*
rb_scan_args (argc, argv, "11", &file, &key);
- Check_Type (file, T_STRING);
-
- if (!NIL_P (key)) {
- Check_Type (key, T_STRING);
+ if (!NIL_P (key))
k = StringValuePtr (key);
- }
evas_object_image_file_set (e->real, StringValuePtr (file), k);
/*
- * $Id: rb_text.c 368 2006-02-15 18:07:49Z tilman $
+ * $Id: rb_text.c 382 2006-05-25 09:20:31Z tilman $
*
* Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
*
{
GET_OBJ (self, RbEvasObject, e);
- Check_Type (val, T_STRING);
-
evas_object_text_font_source_set (e->real, StringValuePtr (val));
return Qnil;
{
GET_OBJ (self, RbEvasObject, e);
- Check_Type (font, T_STRING);
Check_Type (size, T_FIXNUM);
evas_object_text_font_set (e->real, StringValuePtr (font),
{
GET_OBJ (self, RbEvasObject, e);
- Check_Type (val, T_STRING);
-
evas_object_text_text_set (e->real, StringValuePtr (val));
return Qnil;