[ViewVC] Diff of: cvs/rxvt-unicode/src/rxvtperl.xs

Comparing rxvt-unicode/src/rxvtperl.xs (file contents):
Revision 1.104 by root, Mon Aug 7 22:28:18 2006 UTC vs.
Revision 1.106 by root, Tue Oct 3 12:13:57 2006 UTC

 	CODE:
 {
         wchar_t *wstr = sv2wcs (str);
 	rxvt_push_locale (THIS->locale);
-        //TODO: use same algorithm as screen.C
+        RETVAL = 0;
-        RETVAL = wcswidth (wstr, wcslen (wstr));
+        for (wchar_t *wc = wstr; *wc; wc++)
+          {
+            int w = WCWIDTH (*wc);
+            if (w)
+              RETVAL += min (w, 1);
+          }
         rxvt_pop_locale ();
         free (wstr);
 }
 	OUTPUT:
         rxvt_pop_locale ();
         RETVAL = wcs2sv (wstr);
         free (wstr);
 }
+	OUTPUT:
+        RETVAL
+char *
+rxvt_term::locale ()
+	CODE:
+        RETVAL = THIS->locale;
 	OUTPUT:
         RETVAL
 #define TERM_OFFSET(sym) offsetof (TermWin_t, sym)

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines