diff --git a/Lib/op2x2.c b/Lib/op2x2.c
index 139a315..0a27dac 100644
--- a/Lib/op2x2.c
+++ b/Lib/op2x2.c
@@ -184,7 +184,7 @@ int	dy[4] = { 0, 0, 1, 1 };
 for (y=0; y<src->height-1; y+=2) {
 	for (x=0; x<src->width-1; x+=2)	{
 		for (foo=0; foo<4; foo++) {
-			bar = (foo+rot)%4;
+			bar = (foo+rot)%4;	/* XXX ? */
 			r = (src->Rpix[y+dy[foo]])[x+dx[foo]];
 			g = (src->Gpix[y+dy[foo]])[x+dx[foo]];
 			b = (src->Bpix[y+dy[foo]])[x+dx[foo]];
@@ -198,25 +198,4 @@ for (y=0; y<src->height-1; y+=2) {
 return FUNC_IS_BETA;
 }
 /*::------------------------------------------------------------------::*/
-int Image_2x2_shiftUL(Image_Desc *src, Image_Desc *dst)
-{
-int		foo;
-
-#if DEBUG_LEVEL
-fprintf(stderr, "this func (%s) is a kluge\n", __func__);
-#endif
-
-if ( (foo=Image_compare_desc(src, dst)) ) {
-	fprintf(stderr, "%s: err compare %d\n", __func__, foo);
-	return foo;
-	}
-
-/* 1er septembre 2008: je n'ai pas la moindre idee de ce que j'ai
- * voulu faire ici :) */
-
-/* 26 novembre 2009: j'arrive pas a me rappeler du pourquoi de
- * ce que doit faire cette fonction */
-
-return FULL_NUCKED;
-}
 /*::------------------------------------------------------------------::*/