Lines Matching +defs:function +defs:list
43 ;; * Respooling doesn't work because contrary to the request-scan function,
72 ;; easy thing to do: inspect the function's form, replace occurences of
129 (function-item nnmail-split-fancy)
130 (function :tag "Other")))
238 the `nndiary-generate-nov-databases' command. The function will go
269 (defvoo nndiary-generate-active-function 'nndiary-generate-active-info)
359 ;; for this header) or one list (specifying all the possible values for this
360 ;; header). In the latter case, the list does NOT include the unspecifyed
540 (push (list group (setq active (cons 1 0)))
551 (list "nndiary" server)))
555 (deffoo nndiary-request-list (&optional server)
564 (nndiary-request-list server))
566 (deffoo nndiary-request-list-newsgroups (&optional server)
595 (funcall nnmail-delete-file-function article)
630 (funcall nnmail-delete-file-function
654 (list (cons group (nndiary-active-number group))))))
730 (funcall nnmail-delete-file-function article))))
950 (funcall nnmail-crosspost-link-function first file t)
987 (push (list group active) nndiary-group-alist))
1050 (interactive (list (or (nnoo-current-server 'nndiary) "")))
1085 (funcall nndiary-generate-active-function dir)
1099 (push (list group
1121 (funcall nnmail-delete-file-function nov))
1195 (list (cadr val))
1221 ;; ### FIXME: remove this function if it's used only once.
1225 ;; - Otherwise returns a list of integers and/or ranges (BEG . END)
1253 ;; schedules (a list of read articles for instance).
1282 (setq res (append res (list min)))
1283 (setq res (append res (list (cons min max))))))
1287 ;; Returns a list of times corresponding to the reminders of date DATE.
1346 (let ((dom-list (nth 2 sched))
1347 (month-list (sort (nndiary-flatten (nth 3 sched) 1 12) '>))
1348 (year-list (sort (nndiary-flatten (nth 4 sched) 1971) '>))
1349 (dow-list (nth 5 sched)))
1353 (cond ((null dow-list)
1354 ;; this gets all days if dom-list is nil
1355 (setq dom-list (nndiary-flatten dom-list 1 31)))
1356 ((null dom-list)
1357 ;; this also gets all days if dow-list is nil
1358 (setq dow-list (nndiary-flatten dow-list 0 6)))
1360 (setq dom-list (nndiary-flatten dom-list 1 31))
1361 (setq dow-list (nndiary-flatten dow-list 0 6))))
1364 (while (setq year (pop year-list))
1365 (let ((months month-list)
1381 (doms dom-list)
1382 (dows dow-list)
1421 (minute-list (sort (nndiary-flatten (nth 0 sched) 0 59) '<))
1422 (hour-list (sort (nndiary-flatten (nth 1 sched) 0 23) '<))
1423 (dom-list (nth 2 sched))
1424 (month-list (sort (nndiary-flatten (nth 3 sched) 1 12) '<))
1428 (dow-list (nth 5 sched))
1435 (cond ((null dow-list)
1436 ;; this gets all days if dom-list is nil
1437 (setq dom-list (nndiary-flatten dom-list 1 31)))
1438 ((null dom-list)
1439 ;; this also gets all days if dow-list is nil
1440 (setq dow-list (nndiary-flatten dow-list 0 6)))
1442 (setq dom-list (nndiary-flatten dom-list 1 31))
1443 (setq dow-list (nndiary-flatten dow-list 0 6))))
1460 (let ((months month-list)
1480 (doms dom-list)
1481 (dows dow-list)
1495 ;; Aaaaaaall right. Now we have a valid list of DAYS for
1505 (let ((hours hour-list)
1516 (let ((minutes minute-list)
1568 (append (nndiary-compute-reminders sched) (list sched))))
1587 (add-to-list 'gnus-extra-headers header)
1588 (add-to-list 'nnmail-extra-headers header)))