[PATCH] pango: Replace deprecated constructs

Signed-off-by: Detlev Zundel <[email protected]>
---
 gnome/gw/pango-support.c |   10 +++++-----
 1 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/gnome/gw/pango-support.c b/gnome/gw/pango-support.c
index 421b68e..e528ec6 100644
--- a/gnome/gw/pango-support.c
+++ b/gnome/gw/pango-support.c
@@ -31,10 +31,10 @@ scm_pango_rectangle_to_scm (PangoRectangle *rect)
 {
     SCM ret = scm_c_make_vector (4, SCM_BOOL_F);
 
-    scm_c_vector_set_x (ret, 0, scm_int2num (rect->x));
-    scm_c_vector_set_x (ret, 1, scm_int2num (rect->y));
-    scm_c_vector_set_x (ret, 2, scm_int2num (rect->width));
-    scm_c_vector_set_x (ret, 3, scm_int2num (rect->height));
+    scm_c_vector_set_x (ret, 0, scm_from_int (rect->x));
+    scm_c_vector_set_x (ret, 1, scm_from_int (rect->y));
+    scm_c_vector_set_x (ret, 2, scm_from_int (rect->width));
+    scm_c_vector_set_x (ret, 3, scm_from_int (rect->height));
 
     return ret;
 }
@@ -44,7 +44,7 @@ scm_scm_to_pango_rectangle (SCM scm, PangoRectangle* rect)
 #define FUNC_NAME "%scm->pango-rectangle"
 {
 #define GET_VINT(v,i) \
-    scm_num2int (scm_c_vector_ref (v, i), 0, FUNC_NAME)
+    scm_to_int (scm_c_vector_ref (v, i))
 
     rect->x = GET_VINT (scm, 0);
     rect->y = GET_VINT (scm, 1);
-- 
1.7.1