suppress warning for ExternalReference print

This commit is contained in:
Joseph C Wang 2015-07-04 13:21:35 +08:00
commit fe39ef5fae

View file

@ -264,8 +264,8 @@ x
setAs('ExternalReference', 'character',
function(from) {if (!is.null(from$"__str__")) from$"__str__"()})
setMethod('print', 'ExternalReference',
function(x) {print(as(x, "character"))})
suppressWarnings(setMethod('print', 'ExternalReference',
function(x) {print(as(x, "character"))}))
%}