for tn in $(seq 1 $(POST_COUNT tag)); do
newtags="$(POST tag $tn)${BR}${newtags}"
done
-newtags="$(POST newtag |tr -d '\r' |tr , '\n')${BR}${newtags}"
+newtags="$(POST newtagn |tr -d '\r' |tr , '\n')${BR}${newtags}"
while [ "${newtags#${BR}}" != "${newtags}" ]; do newtags="${newtags#${BR}}"; done
while [ "${newtags%${BR}}" != "${newtags}" ]; do newtags="${newtags%${BR}}"; done