Esta es una respuesta indirecta a su pregunta: no estoy seguro de cómo averiguar cuál es el nombre de archivo del búfer original sin hacer lo siguiente. (EDITAR: la respuesta de @ purple_arrows completa los detalles: puedes usarla buffer-base-buffer
. Acepta esa respuesta como la más correcta).
El siguiente consejo asociará el nombre de archivo del búfer original con cada uno de sus clones indirectos:
(defadvice clone-indirect-buffer (around associate-filename activate)
"Associate the original filename with the cloned buffer."
(let ((filename buffer-file-name))
ad-do-it
(setq buffer-file-name filename)))
Ahora, cada uno de los clones tiene el mismo nombre de archivo que el búfer original.
Utilizo mucho los búferes clonados indirectamente y me gusta poder, por ejemplo, guardar el archivo asociado cuando estoy trabajando con cualquiera de los búferes, en lugar del original. Este consejo fue mi solución para ese flujo de trabajo deseado.