ASCII export: Allow to export buffers without a file name

lisp/ChangeLog

@@ -1,5 +1,8 @@
 2010-03-25  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-ascii.el (org-export-as-ascii): Catch the case of exporting
+	a buffer with no file name attached.
+
 	* org.el (org-log-refile): New option.
 	(org-log-note-headings): Add a heading for refiling.
 	(org-startup-options): Add keywords for logging of the refile

lisp/org-ascii.el

@@ -227,8 +227,10 @@ publishing directory."
 		    (and (not
 			  (plist-get opt-plist :skip-before-1st-heading))
 			 (org-export-grab-title-from-buffer))
-		    (file-name-sans-extension
-		     (file-name-nondirectory bfname))))
+		    (and (buffer-file-name)
+			 (file-name-sans-extension
+			  (file-name-nondirectory bfname)))
+		    "UNTITLED"))
 	 (email (plist-get opt-plist :email))
 	 (language (plist-get opt-plist :language))
 	 (quote-re0 (concat "^[ \t]*" org-quote-string "\\>"))