Function: TeX-fold--last-name
TeX-fold--last-name is a byte-compiled function defined in
tex-fold.el.
Signature
(TeX-fold--last-name NAME)
Documentation
Return string consisting of last name of NAME.
NAME should be of the form "Last, First" or "First Last", possibly with some additional non-alphabetical characters such as braces.
Source Code
;; Defined in ~/.emacs.d/elpa/auctex-14.1.2/tex-fold.el
;;;; citations
(defun TeX-fold--last-name (name)
"Return string consisting of last name of NAME.
NAME should be of the form \"Last, First\" or \"First Last\", possibly
with some additional non-alphabetical characters such as braces."
(if-let* ((comma (string-match "," name)))
(setq name (substring name 0 comma))
(when-let* ((space (string-match " " name)))
(setq name (substring name space))))
(when-let* ((index (string-match "[[:alpha:]]" name)))
(setq name (substring name index)))
(when-let* ((index (string-match "[^[:alpha:]]" name)))
(setq name (substring name 0 index)))
name)