[Turn off line numbering]1: arg short; 2: var x, part; 3: 4: part = 1; 5: while ((x = stridx(short, "*"))) { 6: short = substr(short, 1, x - 1) + "%" + part + substr(short, x + 1); 7: part++; 8: } 9: return short;
// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit