Lines Matching refs:bufname
1576 (woman-make-bufname (file-name-nondirectory buffer-file-name)))
1619 (let* ((bufname (file-name-nondirectory file-name))
1622 (not (not (string-match woman-file-compression-regexp bufname)))))
1624 (setq bufname (file-name-sans-extension bufname)))
1625 (setq bufname (if exists
1627 (woman-make-bufname bufname)))
1628 (woman-really-find-file file-name compressed bufname)
1631 (cons (cons file-name bufname) woman-buffer-alist)
1638 (defun woman-make-bufname (bufname)
1640 (let ((dot (string-match "\\." bufname)))
1641 (if dot (setq bufname (concat
1642 (substring bufname (1+ dot)) " "
1643 (substring bufname 0 dot))))
1645 (concat "*WoMan " bufname "*"))))
1650 (defun woman-really-find-file (filename compressed bufname)
1660 (switch-to-buffer (get-buffer-create bufname))