usprawnienie funkcji UsunWpis