diff lisp/update-elc.el @ 5128:7be849cb8828 ben-lisp-object

merge
author Ben Wing <ben@xemacs.org>
date Sun, 07 Mar 2010 02:09:59 -0600
parents 99f8ebc082d9
children 0d43872986b6
line wrap: on
line diff
--- a/lisp/update-elc.el	Fri Mar 05 04:08:17 2010 -0600
+++ b/lisp/update-elc.el	Sun Mar 07 02:09:59 2010 -0600
@@ -137,7 +137,7 @@
 
 (defun update-elc-chop-extension (file)
   (if (string-match "\\.elc?$" file)
-      (substring file 0 (match-beginning 0))
+      (subseq file 0 (match-beginning 0))
     file))
 
 ;; we used to call packages-list-autoloads here, but it's false generality.