diff --git a/pkgs/applications/science/math/R/default.nix b/pkgs/applications/science/math/R/default.nix index 285673baa3c..e75ae2222ae 100644 --- a/pkgs/applications/science/math/R/default.nix +++ b/pkgs/applications/science/math/R/default.nix @@ -7,11 +7,11 @@ }: stdenv.mkDerivation rec { - name = "R-3.4.0"; + name = "R-3.4.1"; src = fetchurl { url = "http://cran.r-project.org/src/base/R-3/${name}.tar.gz"; - sha256 = "14cb8bwi3akvdb6934kqic2862f2qgav6cq4g0h7gi2p4ka9x3i8"; + sha256 = "0y7wlfk3cn1dxn2mpnxwvsk31s0599crbsyah8srm5pa2mfi7c82"; }; buildInputs = [ @@ -21,7 +21,7 @@ stdenv.mkDerivation rec { ] ++ stdenv.lib.optionals (!stdenv.isDarwin) [ tcl tk ] ++ stdenv.lib.optionals stdenv.isDarwin [ Cocoa Foundation cf-private libobjc ]; - patches = [ ./no-usr-local-search-paths.patch ./fix-sweave-exit-code.patch ]; + patches = [ ./no-usr-local-search-paths.patch ]; preConfigure = '' configureFlagsArray=( diff --git a/pkgs/applications/science/math/R/fix-sweave-exit-code.patch b/pkgs/applications/science/math/R/fix-sweave-exit-code.patch deleted file mode 100644 index 8ca1be750a5..00000000000 --- a/pkgs/applications/science/math/R/fix-sweave-exit-code.patch +++ /dev/null @@ -1,52 +0,0 @@ -From 0ff560ba912fad126576818519035c8d3c693bed Mon Sep 17 00:00:00 2001 -From: maechler -Date: Mon, 24 Apr 2017 14:24:11 +0000 -Subject: [PATCH] R CMD Sweave status bug fix - -git-svn-id: https://svn.r-project.org/R/trunk@72612 00db46b3-68df-0310-9c12-caf00c1e9a41 - -diff --git a/src/library/utils/R/Sweave.R b/src/library/utils/R/Sweave.R -index 2beb094..8d4950b 100644 ---- a/src/library/utils/R/Sweave.R -+++ b/src/library/utils/R/Sweave.R -@@ -1,7 +1,7 @@ - # File src/library/utils/R/Sweave.R - # Part of the R package, https://www.R-project.org - # --# Copyright (C) 1995-2016 The R Core Team -+# Copyright (C) 1995-2017 The R Core Team - # - # This program is free software; you can redistribute it and/or modify - # it under the terms of the GNU General Public License as published by -@@ -452,10 +452,10 @@ SweaveHooks <- function(options, run = FALSE, envir = .GlobalEnv) - } - do_exit <- - if(no.q) -- function(status = 1L) (if(status) stop else message)( -+ function(status = 0L) (if(status) stop else message)( - ".Sweave() exit status ", status) - else -- function(status = 1L) q("no", status = status, runLast = FALSE) -+ function(status = 0L) q("no", status = status, runLast = FALSE) - - if (!length(args)) { - Usage() -@@ -577,16 +577,15 @@ SweaveHooks <- function(options, run = FALSE, envir = .GlobalEnv) - } - do_exit <- - if(no.q) -- function(status = 1L) (if(status) stop else message)( -+ function(status = 0L) (if(status) stop else message)( - ".Stangle() exit status ", status) - else -- function(status = 1L) q("no", status = status, runLast = FALSE) -+ function(status = 0L) q("no", status = status, runLast = FALSE) - - if (!length(args)) { - Usage() - do_exit(1L) - } -- - file <- character() - encoding <- options <- "" - engine <- NULL