Function: remember-append-to-file

remember-append-to-file is a byte-compiled function defined in remember.el.gz.

Signature

(remember-append-to-file)

Documentation

Remember, with description DESC, the given TEXT.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/remember.el.gz
(defun remember-append-to-file ()
  "Remember, with description DESC, the given TEXT."
  (let* ((text (buffer-string))
         (desc (remember-buffer-desc))
         (remember-text (concat "\n"
                                (if remember-text-format-function
                                    (funcall remember-text-format-function text)
                                  (concat remember-leader-text
                                          (format-time-string remember-time-format)
                                          " (" desc ")\n\n" text))
                                (save-excursion (goto-char (point-max))
                                                (if (bolp) nil "\n"))))
         (buf (find-buffer-visiting remember-data-file)))
    (if buf
        (with-current-buffer buf
          (save-excursion
            (goto-char (point-max))
            (insert remember-text))
          (if remember-save-after-remembering (save-buffer)))
      (append-to-file remember-text nil remember-data-file))))