Bugfix: Make option completion work in indirect buffers

Reported by Shaun Johnson.

lisp/ChangeLog

@@ -1,3 +1,8 @@
+2009-01-28  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* org-exp.el (org-get-current-options): Fix bug when in indirect
+	buffer.
+
 2009-01-27  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* org-agenda.el (org-agenda-dim-blocked-tasks): New option.

lisp/org-exp.el

@@ -3031,7 +3031,10 @@ Does include HTML export options as well as TODO and CATEGORY stuff."
    (mapconcat 'identity org-export-exclude-tags " ")
    org-export-html-link-up
    org-export-html-link-home
-   (file-name-nondirectory buffer-file-name)
+   (or (ignore-errors
+	 (file-name-sans-extension
+	  (file-name-nondirectory (buffer-file-name (buffer-base-buffer)))))
+       "NOFILENAME")
    "TODO FEEDBACK VERIFY DONE"
    "Me Jason Marie DONE"
    org-highest-priority org-lowest-priority org-default-priority