Put a procedure from unit_helper in use to avoid duplicate code.

git-svn-id: http://svn.gna.org/svn/wesnoth/trunk@56061 75b3775d-3801-0410-9e12-e2e43121521d