(bind-func xtm_path_translate (lambda (tx ty) (vgSeti VG_MATRIX_MODE VG_MATRIX_PATH_USER_TO_SURFACE) (vgTranslate tx ty)))