Make use of helper function.
Make use of helper function.

git-svn-id: https://svn.sable.mcgill.ca/mclab/Project@244 89b902b4-d83f-0410-b942-89f7a419ffdb

Migrated from Sable/mclab@62e220c03a73b5ccc3213acdb7a443449fae0077

Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core