]> code.delx.au - gnu-emacs/blobdiff - lisp/play/gamegrid.el
* lisp/epa-file.el (epa-file-select-keys): Revert to nil default.
[gnu-emacs] / lisp / play / gamegrid.el
index 99e3b487437b6720c7fd3478eb1b91e28d631aed..e245e70a55c7c36cb67d36b1ab60825016dc06a7 100644 (file)
@@ -485,12 +485,11 @@ FILE is created there."
 (defvar gamegrid-shared-game-dir)
 
 (defun gamegrid-add-score-with-update-game-score (file score)
-  (let* ((result nil) ;; What is this good for? -- os
-        (gamegrid-shared-game-dir
-         (not (zerop (logand (file-modes
-                              (expand-file-name "update-game-score"
-                                                exec-directory))
-                             #o4000)))))
+  (let ((gamegrid-shared-game-dir
+        (not (zerop (logand (file-modes
+                             (expand-file-name "update-game-score"
+                                               exec-directory))
+                            #o4000)))))
     (cond ((file-name-absolute-p file)
           (gamegrid-add-score-insecure file score))
          ((and gamegrid-shared-game-dir