Including source when exporting in PDF

[Frozenlock <frozenlock@gmail.com>]

I am a strong advocate in keeping the source of everything.

However,  a source can easily be lost if it doesn't follow the document.
In LaTeX, there's a package to attach a file to a PDF (like when you
attach a file to an email).
By doing so, the source will follow the PDF even if the common reader
have no clue what it's for, or even how to use it.

Here is how I attach my org source to every document I export to PDF:

--8<---------------cut here---------------start------------->8---

;; Include the source file for every exported PDF (org-mode)
(eval-after-load "org-exp"
  '(defadvice org-export-as-latex (around org-export-add-source-pdf activate)
     "Add the source (org file) to the resulting pdf file"
     (let ((filename (buffer-name)))
       ad-do-it ;do the function
       (let ((latex-buffer ad-return-value))
	 (set-buffer latex-buffer)
	 (while (re-search-forward "\\\\usepackage{.+}" nil t)); go to the
end of packages
	 (insert "\n\\usepackage{attachfile2}"); the package needed to attach files
	 (when (re-search-forward "\\\\end{document}" nil t)
	   (forward-line -1)
	   (insert
	    (concat
	     "\\vfill\n"
	     "\\footnotesize\n"
	     "The source of this document is an Org-Mode file attached here:"
	     "\n\\attachfile"
	     "{" filename "}")))
	 (save-buffer)))))

--8<---------------cut here---------------end--------------->8---

This is by no mean a patch, but rather a quick hack. Perhaps someone
with a working knowledge of the org-export could find a way to add a
source option?


Cheers!