Hi,
A while back I wrote a function that I call from org-mode-hook to
rename the buffer if it's file name is project.org. It would rename
it to "Org - <category>" based on the category in the file. I did
this because I tend to have different directories for the different
sorts of things I work on and I keep a consistently named file with
the state of the projects working from there. The problem was that
all of my org buffers were call projects.org.
Anyhow, I wrote that function using org-get-category and
org-get-category-table to determine the category for the file so I
could produce a more useful buffer name. It looks like the category
table is gone now. Would there be a good way to determine the
category of the the first #+CATEGORY entry in the file and get
something like default if there isn't one? Or, does anyone have any
other interesting ideas for giving a unique buffer name to org files
with the same file name?
If you're curious, the rename function I'm was using is:
(defun my-org-buffer-name ()
(if (buffer-file-name)
(when (string= (file-name-nondirectory buffer-file-name)
"projects.org")
(let* ((org-category-table (org-get-category-table)) ; work around
some dynamic scope issue
(new-buffer-name (format "Org -- %s" (org-get-category)))
(buffer-name-re (concat "^"
new-buffer-name
"\\(<[0-9]+>\\)?")))
(unless (string-match buffer-name-re (buffer-name))
(rename-buffer new-buffer-name t) )))))
(add-hook 'org-mode-hook 'my-org-buffer-name)
Thanks,
Edd
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
