Function: woman-make-bufname

woman-make-bufname is a byte-compiled function defined in woman.el.gz.

Signature

(woman-make-bufname BUFNAME)

Documentation

Create an unambiguous buffer name from BUFNAME.

Source Code

;; Defined in /usr/src/emacs/lisp/woman.el.gz
(defun woman-make-bufname (bufname)
  "Create an unambiguous buffer name from BUFNAME."
  ;; See Bug#5038.  Any compression extension has already been removed.
  ;; Go from eg "host.conf.5" to "5 host.conf".
  (let ((dot (string-match "\\.[^.]*\\'" bufname)))
    (if dot (setq bufname (concat
			   (substring bufname (1+ dot)) " "
			   (substring bufname 0 dot))))
    (generate-new-buffer-name		; ensure uniqueness
     (concat "*WoMan " bufname "*"))))