#make this change...
#$lbox->g_bind('<ButtonRelease-1>' , sub { clic()    });
$mw->g_bind('<ButtonRelease-1>' , sub { clic()    });