View | Details | Raw Unified | Return to bug 16490 | Differences between
and this patch

Collapse All | Expand All

(-)src/library/methods/R/RMethodUtils.R (-1 lines)
Lines 483-489 Link Here
483
    value <- if(missing(where))
483
    value <- if(missing(where))
484
        .getGenericFromCache(f, where,  package) ## else NULL
484
        .getGenericFromCache(f, where,  package) ## else NULL
485
    if(is.null(value)) {
485
    if(is.null(value)) {
486
        if(is.character(f) && f %in% "as.double") f <- "as.numeric"
487
        if(is.character(f) && !nzchar(f)) {
486
        if(is.character(f) && !nzchar(f)) {
488
            message("Empty function name in .getGeneric")
487
            message("Empty function name in .getGeneric")
489
            dput(sys.calls())
488
            dput(sys.calls())

Return to bug 16490