Remove generic overwriting hook

robjhyndman · Nov 27, 2019 · 36b94e7 · 36b94e7
1 parent f241fd3
commit 36b94e7
Showing 1 changed file with 9 additions and 9 deletions.
diff --git a/R/attach.R b/R/attach.R
@@ -44,15 +44,15 @@ overwrite_s3_generic <- function(pkg, generic){
   }
 
   # Always register hook in case package is later unloaded & reloaded
-  setHook(
-    packageEvent(pkg, "onLoad"),
-    function(...) {
-      pkg_env <- asNamespace("forecast")
-      unlockBinding(generic, pkg_env)
-      assign(generic, get(generic, asNamespace(pkg)), envir = pkg_env)
-      lockBinding(generic, pkg_env)
-    }
-  )
+  # setHook(
+  #   packageEvent(pkg, "onLoad"),
+  #   function(...) {
+  #     pkg_env <- asNamespace("forecast")
+  #     unlockBinding(generic, pkg_env)
+  #     assign(generic, get(generic, asNamespace(pkg)), envir = pkg_env)
+  #     lockBinding(generic, pkg_env)
+  #   }
+  # )
 }
 
 #' @importFrom utils methods