Fixed thisRequires() bug by testing for interactivity

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: manynet
 Title: Many Ways to Make, Modify, Map, Mark, and Measure Myriad Networks
-Version: 1.2.3
+Version: 1.2.4
 Date: 2024-10-05
 Description: Many tools for making, modifying, mapping, marking, measuring, 
    and motifs and memberships of many different types of networks.
@@ -11,12 +11,12 @@ Description: Many tools for making, modifying, mapping, marking, measuring,
    and describing and visualizing networks with sensible defaults.
 URL: https://stocnet.github.io/manynet/
 BugReports: https://github.com/stocnet/manynet/issues
-Depends: R (>= 3.6.0)
 License: MIT + file LICENSE
 Language: en-GB
 Encoding: UTF-8
 LazyData: true
 RoxygenNote: 7.3.2
+Depends: R (>= 3.6.0)
 Imports:
     cli,
     dplyr (>= 1.1.0),

NEWS.md

@@ -1,3 +1,14 @@
+# manynet 1.2.4
+
+## Package
+
+- Fixed `thisRequires()` bug by testing for interactivity
+- Dropped brokerage census examples
+
+## Modifying
+
+- Improved `to_ego()` and `to_egos()` to specify direction
+
 # manynet 1.2.3
 
 ## Mapping

R/manynet-utils.R

@@ -16,7 +16,7 @@ available_methods <- function(fun_vctr) {
 
 # Helper function for checking and downloading packages
 thisRequires <- function(pkgname){
-  if (!requireNamespace(pkgname, quietly = TRUE)) {
+  if (!requireNamespace(pkgname, quietly = TRUE) & interactive()) {
     if(utils::askYesNo(msg = paste("The", pkgname, 
                                    "package is required to run this function. Would you like to install", pkgname, "from CRAN?"))) {
       utils::install.packages(pkgname)
@@ -27,7 +27,7 @@ thisRequires <- function(pkgname){
 }
 
 thisRequiresBio <- function(pkgname) {
-  if (!requireNamespace(pkgname, quietly = TRUE)) {
+  if (!requireNamespace(pkgname, quietly = TRUE) & interactive()) {
     if(utils::askYesNo(msg = paste("The", pkgname, 
                                    "package is required to run this function. Would you like to install", pkgname, "from BioConductor?"))) {
   thisRequires("BiocManager")