Permalink
Browse files

=Minor bugfix: removed call to `acons' at runtime.

  • Loading branch information...
1 parent b990857 commit 772e9734207958fb995496d1a84254ff54be7862 @escherdragon committed Jul 5, 2012
Showing with 3 additions and 4 deletions.
  1. +3 −4 sunrise-x-old-checkpoints.el
@@ -7,7 +7,7 @@
;; Maintainer: José Alfredo Romero L. <escherdragon@gmail.com>
;; Created: 28 Dec 2009
;; Version: 1
-;; RCS Version: $Rev: 423 $
+;; RCS Version: $Rev: 427 $
;; Keywords: sunrise commander, old checkpoints
;; URL: http://www.emacswiki.org/emacs/sunrise-x-old-checkpoints.el
;; Compatibility: GNU Emacs 22
@@ -65,9 +65,8 @@
(sr-save-directories)
(if (null my-cell)
(setq sr-checkpoint-registry
- (acons name
- (list sr-left-directory sr-right-directory)
- sr-checkpoint-registry))
+ (cons (cons name (list sr-left-directory sr-right-directory))
+ sr-checkpoint-registry))
(setcdr my-cell (list sr-left-directory sr-right-directory)))
(message "%s" (concat "Checkpoint \"" name "\" saved"))))

0 comments on commit 772e973

Please sign in to comment.