Use "-p" to printout module. Use "-P" to printout module toggling the case.

git-svn-id: https://www.ocp.inf.ethz.ch/svn/aos/trunk@5413 8c9fc860-2736-0410-a75d-ab315db34111