Mercurial > mxe-octave
view src/pstoedit-5-use_gs_env.patch @ 4734:80461a9e516c
override default xerbla with version from Octave
* mingw-blas-1-xerbla.patch, blas.mk: Build default libxerbla lib.
* mingw-lapack-1-xerbla.patch, lapack.mk: Use external libxerbla.
* mingw-openblas-1-xerbla.patch, openblas.mk: Likewise.
* src/qrupdate-1-fixes.patch: Likewise.
* default-octave.mk: Also install libxerbla.dll as libxerbla-octave.dll.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 21 Jun 2018 01:32:10 -0400 |
parents | cc549d1865cb |
children | 8d61de83cf90 |
line wrap: on
line source
diff -ur pstoedit-3.70.orig/src/callgs.cpp pstoedit-3.70/src/callgs.cpp --- pstoedit-3.70.orig/src/callgs.cpp 2016-07-27 13:04:53.173499210 -0400 +++ pstoedit-3.70/src/callgs.cpp 2016-07-27 13:56:54.686649091 -0400 @@ -364,7 +364,15 @@ } else { if (verbose) errstream<< "nothing found in gsview32.ini file - using find_gs to lookup latest version of Ghostscript in registry " << endl; static char buf[1000]; - if (find_gs(buf, sizeof(buf), 550 /* min ver*/ , getPstoeditsetDLLUsage() , gsregbase)) { + + + gstocall = getenv("GS"); + + if(gstocall) { + if (verbose) + errstream << "GS is set to:" << gstocall << endl; + + } else if (find_gs(buf, sizeof(buf), 550 /* min ver*/ , getPstoeditsetDLLUsage() , gsregbase)) { if (verbose) { (void)dumpgsvers(gsregbase); if (getPstoeditsetDLLUsage()) errstream << "Latest GS DLL is " << buf << endl;