version 2.0.1.1 from CRAN

igraph · Jan 31, 2024 · 09ab207 · 09ab207
1 parent ffe03b5
commit 09ab207
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 7 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: igraph
-Version: 2.0.1
+Version: 2.0.1.1
 Title: Network Analysis and Visualization
 Authors@R: c(
     person("Gábor", "Csárdi", , "csardi.gabor@gmail.com", role = "aut",

diff --git a/R/plot.R b/R/plot.R
@@ -863,7 +863,7 @@ igraph.Arrows <-
            open = TRUE,
            sh.adj = 0.1,
            sh.lwd = 1,
-           sh.col = if (is.R()) par("fg") else 1,
+           sh.col =  par("fg"),
            sh.lty = 1,
            h.col = sh.col,
            h.col.bo = sh.col,
@@ -875,11 +875,7 @@ igraph.Arrows <-
   {
     cin <- size * par("cin")[2]
     width <- width * (1.2 / 4 / cin)
-    uin <- if (is.R()) {
-      1 / xyinch()
-    } else {
-      par("uin")
-    }
+    uin <- 1 / xyinch()
     x <- sqrt(seq(0, cin^2, length.out = floor(35 * cin) + 2))
     delta <- sqrt(h.lwd) * par("cin")[2] * 0.005 ## has been 0.05
     x.arr <- c(-rev(x), -x)