Lines Matching defs:make
443 ;; This kludge is to make customizations to
460 (let ((ol (make-overlay (point-min) (point-max) nil t nil)))
461 (set (make-local-variable 'diary-selective-display) t)
505 ;; Found a nonempty diary entry--make it
696 (make-fancy-diary-buffer)
749 (concat "\n" (make-string l ? ))))
750 (insert ?\n (make-string (+ l longest) ?=) ?\n)))))
771 (setq temp-face (make-symbol
779 (make-face temp-face)
791 (make-overlay (match-beginning 0) (match-end 0))
802 (defun make-fancy-diary-buffer ()
854 (make-string (length heading) ?=) "\n")
1051 (calendar-make-alist
1059 (calendar-make-alist
1742 (defun make-diary-entry (string &optional nonmarking file)
1766 Prefix arg will make the entry nonmarking."
1768 (make-diary-entry (calendar-date-string (calendar-cursor-to-date t) t t)
1773 Prefix arg will make the entry nonmarking."
1775 (make-diary-entry (calendar-day-name (calendar-cursor-to-date t))
1780 Prefix arg will make the entry nonmarking."
1786 (make-diary-entry (calendar-date-string (calendar-cursor-to-date t) t)
1791 Prefix arg will make the entry nonmarking."
1797 (make-diary-entry (calendar-date-string (calendar-cursor-to-date t) t)
1802 Prefix arg will make the entry nonmarking."
1808 (make-diary-entry
1816 Prefix arg will make the entry nonmarking."
1832 (make-diary-entry
1841 Prefix arg will make the entry nonmarking."
1847 (make-diary-entry
1856 (let ((map (make-sparse-keymap)))
1865 (set (make-local-variable 'font-lock-defaults)
1945 (set (make-local-variable 'font-lock-defaults)
2095 body text as argument, and may use `match-string' etc. to make a
2114 message contains an appointment, don't make a diary entry."
2127 (make-diary-entry