diff --git a/R/scan.R b/R/scan.R
index 7780bdae086..69cddd966ad 100644
--- a/R/scan.R
+++ b/R/scan.R
@@ -200,7 +200,7 @@ local_scan <- function(graph.us, graph.them = NULL, k = 1, FUN = NULL,
         ## General
       } else {
         sapply(
-          graph.neighborhood(graph.us, order = k, V(graph.us), mode = mode),
+          make_ego_graph(graph.us, order = k, V(graph.us), mode = mode),
           FUN, ...
         )
       }