org-detangle.org 1.8 KB

Org Detangle Shell Script

Copyright Statement

  Copyright FlintFam Systems Management, 2013.
  
  This program is free software: you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation, either version 3 of the License, or
  (at your option) any later version.
  
  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.
  
  You should have received a copy of the GNU General Public License
  along with this program.  If not, see <http://www.gnu.org/licenses/>.

Variable Definitions

  DIR=`pwd`
  FILES=""
  
  for i in $@; do
      FILES="$FILES \"$i\""
  done
  
  ORGBASEDIR=''
  ORGLDIR="${ORGBASEDIR}/lisp/"
  ORGCONTRIB="${ORGBASEDIR}/contrib/"

Process

  emacs -Q --batch \
      --eval "(progn
       (add-to-list 'load-path (expand-file-name \"$ORGLDIR\"))
       (add-to-list 'load-path (expand-file-name \"$ORGCONTRIB\" t))
       (require 'org)(require 'org-exp)(require 'ob)(require 'ob-tangle)
       (mapc (lambda (file)
              (find-file (expand-file-name file \"$DIR\"))
              (org-babel-tangle)
              (kill-buffer)) '($FILES)))" 2>&1 |grep tangled

Final Code

  # <<CopyrightStatement>>
  
  <<VarSetup>>
  
  <<ProcessFiles>>