Function: nnmail-get-split-group

nnmail-get-split-group is a byte-compiled function defined in nnmail.el.gz.

Signature

(nnmail-get-split-group FILE SOURCE)

Documentation

Find out whether this FILE is to be split into GROUP only.

If SOURCE is a directory spec, try to return the group name component.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnmail.el.gz
(defun nnmail-get-split-group (file source)
  "Find out whether this FILE is to be split into GROUP only.
If SOURCE is a directory spec, try to return the group name component."
  (if (eq (car source) 'directory)
      (let ((file (file-name-nondirectory file)))
	(mail-source-bind (directory source)
	  (if (string-match (concat (regexp-quote suffix) "\\'") file)
	      (substring file 0 (match-beginning 0))
	    nil)))
    nil))