Source Mage code commit list

[Ismael Luceno <scm AT sourcemage.org>]

GIT changes to master grimoire by Ismael Luceno <ismael AT sourcemage.org>:

 emacs-lisp/FUNCTIONS |   42 +++++++++++++++---------------------------
 1 file changed, 15 insertions(+), 27 deletions(-)

New commits:
commit d4cec97b4fc46e4848d8f555ad7e143f95bc76bf
Author: Ismael Luceno <ismael AT sourcemage.org>
Commit: Ismael Luceno <ismael AT sourcemage.org>

    emacs-lisp/FUNCTIONS: Install gzipped emacs-lisp files

commit 3f03f6dcc6a51de5a45722691ad89549f1212a7c
Author: Ismael Luceno <ismael AT sourcemage.org>
Commit: Ismael Luceno <ismael AT sourcemage.org>

    emacs-lisp/FUNCTIONS: Update site-lisp's loaddefs.el

commit 71aed0937559de4c21da05856d36daa5d848b43c
Author: Ismael Luceno <ismael AT sourcemage.org>
Commit: Ismael Luceno <ismael AT sourcemage.org>

    emacs-lisp/FUNCTIONS: Replace loops

diff --git a/emacs-lisp/FUNCTIONS b/emacs-lisp/FUNCTIONS
index 4375212..66513d1 100755
--- a/emacs-lisp/FUNCTIONS
+++ b/emacs-lisp/FUNCTIONS
@@ -11,20 +11,12 @@ function emacs_lisp_install() {
 #-------------------------------------------------------------------------
 function default_build_emacs_lisp() {
   [ $# = 0 ] && set -- "$SOURCE_DIRECTORY"
-  shopt -s nullglob
 
-  local texi_files
-
-  while [ $# -gt 0 ]; do
-    emacs -Q -L "$1" -batch -f batch-byte-compile "$1"/*.el &&
-    texi_files=("$1"/*.texi)
-    if [ ${#texi_files[@]} -gt 0 ]
-    then
-      makeinfo "${texi_files[@]}" &&
-      gzip -9 "$1"/*.info
-    fi
-    shift
-  done
+  find "$@" -maxdepth 1 -name \*.el \
+       -execdir emacs -Q -L . --batch -f batch-byte-compile {} + \
+       -execdir gzip -9 {} + \
+       -o -name \*.texi -execdir makeinfo {} \; -print0 |
+  sed -z 's@texi$@info@' | xargs -r0 gzip -9
 }
 
 #-------------------------------------------------------------------------
@@ -32,24 +24,20 @@ function default_build_emacs_lisp() {
 #-------------------------------------------------------------------------
 function default_install_emacs_lisp() {
   [ $# = 0 ] && set -- "$SOURCE_DIRECTORY"
-  shopt -s nullglob
 
   local dir="$INSTALL_ROOT/usr/share/emacs/site-lisp/$SPELL"
   local info_dir="$INSTALL_ROOT/usr/share/info"
 
-  local info_files
-
-  while [ $# -gt 0 ]; do
-    install -d -m755 "$dir" &&
-    install -m644 "$1"/*.el "$1"/*.elc "$dir" &&
-    info_files=("$1"/*.info.gz)
-    if [ ${#info_files[@]} -gt 0 ]
-    then
-      install -m644 "${info_files[@]}" "$info_dir" &&
-      install-info --info-dir="$info_dir" "${info_files[@]/#*\//$info_dir/}"
-    fi
-    shift
-  done
+  install -d -m755 "$dir" &&
+  find "$@" -maxdepth 1 \( -name \*.el.gz -o -name \*.elc \) \
+       -exec install -m644 -t "$dir" {} + \
+       -o -name \*.info.gz \
+       -exec install -m644 -t "$info_dir" {} \; -print0 |
+  sed -z "s@.*/@$info_dir/@" | xargs -r0 install-info --info-dir="$info_dir" 
&&
+  emacs -Q --batch --eval '
+    (let ((generated-autoload-file (car argv)))
+      (update-directory-autoloads (elt argv 1)))
+  ' "$dir/../loaddefs.el" "$dir"
 }
 
 function default_build() {