diff options
| author |   Stephanie J. Lockwood-Childs <wormo@gentoo.org> | 2006-04-12 06:16:35 +0000 |
|---|---|---|
| committer | Stephanie J. Lockwood-Childs <wormo@gentoo.org> | 2006-04-12 06:16:35 +0000 |
| commit | 3cf97af007953aec0dad27dcc65f074dcc02a9b2 (patch) | |
| tree | 0dd490437b2b897bb5ea137561e6bd5c89701651 /sci-mathematics/maxima/files | |
| parent | Stable on ppc64; bug #129151 (diff) | |
| download | historical-3cf97af007953aec0dad27dcc65f074dcc02a9b2.tar.gz historical-3cf97af007953aec0dad27dcc65f074dcc02a9b2.tar.bz2 historical-3cf97af007953aec0dad27dcc65f074dcc02a9b2.zip | |
stop xmaxima with clisp from executing 'kill -TERM -1' on exit (Bug #111062)
Package-Manager: portage-2.0.54
Diffstat (limited to 'sci-mathematics/maxima/files')
| -rw-r--r-- | sci-mathematics/maxima/files/maxima-5.9.1-fix-clisp-getpid.patch | 12 | ||||
| -rw-r--r-- | sci-mathematics/maxima/files/maxima-5.9.1-no-kill-minus-one.patch | 24 |
2 files changed, 36 insertions, 0 deletions
diff --git a/sci-mathematics/maxima/files/maxima-5.9.1-fix-clisp-getpid.patch b/sci-mathematics/maxima/files/maxima-5.9.1-fix-clisp-getpid.patch new file mode 100644 index 000000000000..4d4f436215ec --- /dev/null +++ b/sci-mathematics/maxima/files/maxima-5.9.1-fix-clisp-getpid.patch @@ -0,0 +1,12 @@ +--- maxima-5.9.1/src/server.lisp.orig 2006-04-06 22:28:19.000000000 -0700 ++++ maxima-5.9.1/src/server.lisp 2006-04-06 22:37:00.000000000 -0700 +@@ -70,7 +70,8 @@ + (deff getpid (symbol-function + ;; Decide at load time which function to use. + (or (and (memq :unix *features*) +- (find-symbol "PROGRAM-ID" "SYS")) ++ (or (find-symbol "PROCESS-ID" "SYS") ++ (find-symbol "PROGRAM-ID" "SYS"))) + 'getpid-from-environment))) + + #+cmu diff --git a/sci-mathematics/maxima/files/maxima-5.9.1-no-kill-minus-one.patch b/sci-mathematics/maxima/files/maxima-5.9.1-no-kill-minus-one.patch new file mode 100644 index 000000000000..41cf85598ca3 --- /dev/null +++ b/sci-mathematics/maxima/files/maxima-5.9.1-no-kill-minus-one.patch @@ -0,0 +1,24 @@ +--- maxima-5.9.1/interfaces/xmaxima/Tkmaxima/RunMaxima.tcl.orig 2004-06-21 15:46:32.000000000 -0700 ++++ maxima-5.9.1/interfaces/xmaxima/Tkmaxima/RunMaxima.tcl 2006-04-04 22:33:51.000000000 -0700 +@@ -451,13 +451,18 @@ + proc CMkill { signal pid } { + global maxima_priv tcl_platform + +- # Windows pids can be negative + if {[string is int $pid]} { +- gui status "Signaling $pid with $signal" ++ # Windows pids can be negative + if {$tcl_platform(platform) == "windows" } { ++ gui status "Signaling $pid with $signal" + exec $maxima_priv(kill) $signal $pid + } else { +- exec $maxima_priv(kill) $signal $pid ++ if {$pid > 1} { ++ gui status "Signaling $pid with $signal" ++ exec $maxima_priv(kill) $signal $pid ++ } else { ++ gui status "Bad PID $pid!! Refusing to send signal $signal" ++ } + } + } + } |