Permalink
Browse files

fix pathing bug in expired script

  • Loading branch information...
1 parent ddcf461 commit 796a48985cc794b12e21c97eb32e77236225cd94 @milkypostman milkypostman committed Nov 20, 2016
Showing with 4 additions and 5 deletions.
  1. +4 −5 scripts/expired
View
@@ -22,14 +22,13 @@
(match-string 1 fn))
-(add-to-list 'load-path (expand-file-name ".." (file-name-directory load-file-name)))
+(add-to-list 'load-path (expand-file-name "../package-build" (file-name-directory load-file-name)))
(require 'package-build)
(dolist (entry-file (directory-files package-build-archive-dir t ".*\.entry$"))
(when (> (time-to-seconds
- (time-subtract (current-time)
- (nth 5 (file-attributes entry-file))))
- (* 23 60 60))
+ (time-subtract (current-time)
+ (nth 5 (file-attributes entry-file))))
+ (* 23 60 60))
(princ (symbol-name (car (package-build--read-from-file entry-file))))
(princ "\n")))
-

0 comments on commit 796a489

Please sign in to comment.