Return the nanonext socket invisibly

NEWS.md

@@ -1,6 +1,6 @@
 # mcptools (development version)
 
-* `mcp_session()` now (invisibly) returns the nanonext socket used for communicating with the server.
+* `mcp_session()` now returns invisibly the nanonext socket used for communicating with the server.
 * `mcp_server()` gains logical argument `session_tools`, allowing users to opt-out of presenting R sessions tools to clients.
 
 # mcptools 0.1.1

R/server.R

@@ -67,8 +67,9 @@
 #' * `mcp_server()` blocks the R process it's called in indefinitely and isn't
 #'   intended for interactive use.
 #' * `mcp_session()` makes the interactive R session it's called in available to
-#'   MCP servers. It returns the \pkg{nanonext} socket used for communicating
-#'   with the server. Call [close()] on the socket to stop the session.
+#'   MCP servers. It returns invisibly the \pkg{nanonext} socket used for
+#'   communicating with the server. Call [close()] on the socket to stop the
+#'   session.
 #'
 #' @seealso
 #' - The "R as an MCP server" vignette at

R/session.R

@@ -25,7 +25,7 @@ mcp_session <- function() {
   the$session <- i
   schedule_handle_message_from_server()
 
-  the$session_socket
+  invisible(the$session_socket)
 }
 
 handle_message_from_server <- function(data) {