... without answering my previous question, I have just found a
fortune-hate workaround,
getIcon <- function(geom){
st <- paste("Geom", firstUpper(geom),"$icon", sep="")
eval(parse(text=st))
}
getIcon("abline")
I'm still curious about the get() behaviour though.
Best,
baptiste