Nowe makro.

common/substitute.tf

@@ -111,3 +111,11 @@
 ;;	/lc
 
 /def nf = /quote -S /unset `/listvar -s *_k*_bije
+
+/def typo =\
+	/let n=$[strchr({*}, '|')]%;\
+	/test param1 := substr({*}, 0, n) %;\
+	/test param2 := substr({*}, n+1) %;\
+	/echo -p @{BCyellow}###@{n} Zdefiniowana podmiana: @{B}%{param1}@{n} => @{B}%{param2}@{n} %;\
+	/def -mregexp -h'SEND %{param1}'\
+	typo_%{1} = /send $$[strcat ({PL}, '%{param2}', replace('%{param1}', '%{param2}', {PR}))]