Using CLC and Allegro common lisp
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
common-lisp-controller (Ubuntu) |
Invalid
|
Undecided
|
Unassigned |
Bug Description
Binary package hint: common-
The post-sysdef-
Here is the diff for the corrected version:
--- post-sysdef-
+++ post-sysdef-
@@ -91,7 +91,7 @@
(let* ((stat (excl.osi:stat (namestring directory)))
(mode (excl.osi:stat-mode stat))
(uid (excl.osi:stat-uid stat)))
+ (values uid mode uid))))
- (values uid mode my-uid))))
#+sbcl
(defmacro with-secure-umask (&body forms)
@@ -119,7 +119,7 @@
(let ((old-umask (gensym)))
`(let ((,old-umask (excl.osi:umask #o077)))
+ (excl.osi:umask ,old-umask)))))
- (excl.osi:umask old-umask)))))
#+(or clisp sbcl cmu allegro)
(defun check-spooldir-
The diff as a file