Adds port if any
Due to ggplot2 bug, using aes in the main ggplot call.
Originaly spotted at http://stackoverflow.com/questions/14391183/ggplot2-annotation-custom-gives-an-empty-layer