Function: vc--add-line

vc--add-line is a byte-compiled function defined in vc.el.gz.

Signature

(vc--add-line STRING FILE)

Documentation

Add STRING as a line to FILE.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc.el.gz
;; Subroutine for `vc-default-ignore'.
(defun vc--add-line (string file)
  "Add STRING as a line to FILE."
  (with-current-buffer (find-file-noselect file)
    (goto-char (point-min))
    (unless (re-search-forward (concat "^" (regexp-quote string) "$") nil t)
      (goto-char (point-max))
      (unless (bolp) (insert "\n"))
      (insert string "\n")
      (save-buffer))))