Lines Matching +defs:value +defs:get
213 (defun icalendar--get-unfolded-buffer (folded-ical-buffer)
219 (let ((unfolded-buffer (get-buffer-create " *icalendar-work*")))
247 (let (element children line name params param param-name param-value
248 value
263 (setq param-value (or (match-string 2) (match-string 3)))
264 (setq param (list param-name param-value))
269 (setq param-value (match-string 2))
270 (setq param-value (match-string 3)))
271 (setq param (append param param-value)))
277 (setq value (icalendar--rris "\r?\n[ \t]" "" (match-string 0)))
278 (setq line (list name params value))
282 (list (icalendar--read-element (intern value)
296 ;;(defsubst icalendar--get-all-event-properties (event)
300 (defun icalendar--get-event-property (event prop)
301 "For the given EVENT return the value of the first occurrence of PROP."
311 (defun icalendar--get-event-property-attributes (event prop)
322 (defun icalendar--get-event-properties (event prop)
332 ;; (defun icalendar--set-event-property (event prop new-value)
333 ;; "For the given EVENT set the property PROP to the value NEW-VALUE."
339 ;; (setcdr (cdr pp) new-value)
344 ;; (append props (list (list prop nil new-value)))))))
346 (defun icalendar--get-children (node name)
359 (icalendar--get-children n name))
370 (icalendar--get-children (car icalendar) 'VEVENT))
372 (defun icalendar--split-value (value-string)
375 param-name param-value)
376 (when value-string
378 (set-buffer (get-buffer-create " *icalendar-work*"))
381 (insert value-string)
388 (setq param-value (match-string 2))
390 (append result (list (list param-name param-value)))))))
556 value of `european-calendar-style'."
566 (defun icalendar--get-month-number (monthname)
581 (defun icalendar--get-weekday-number (abbrevweekday)
596 (defun icalendar--get-weekday-abbrev (weekday)
652 (setq month (icalendar--get-month-number
665 (setq month (icalendar--get-month-number
746 (set-buffer (get-buffer-create "*icalendar-errors*"))
796 (set-buffer (get-buffer-create "*icalendar-errors*"))
1016 (icalendar--get-weekday-abbrev
1019 (let* ((day (icalendar--get-weekday-abbrev
1064 (+ (icalendar--get-weekday-number day) 2))
1073 (+ (icalendar--get-weekday-number day)
1103 (month (icalendar--get-month-number
1489 (set-buffer (icalendar--get-unfolded-buffer (current-buffer)))
1538 (contents (icalendar--get-event-property event prop))
1545 (symbol-value format)
1576 (let* ((dtstart (icalendar--get-event-property e 'DTSTART))
1581 (dtend (icalendar--get-event-property e 'DTEND))
1588 (or (icalendar--get-event-property e 'SUMMARY)
1590 (rrule (icalendar--get-event-property e 'RRULE))
1591 (rdate (icalendar--get-event-property e 'RDATE))
1592 (duration (icalendar--get-event-property e 'DURATION)))
1597 (cadr (icalendar--get-event-property-attributes
1624 (icalendar--get-event-property-attributes
1644 (icalendar--split-value rdate)))
1702 (set-buffer (get-buffer-create "*icalendar-errors*"))
1716 (let* ((rrule (icalendar--get-event-property e 'RRULE))
1717 (rrule-props (icalendar--split-value rrule))
1800 (icalendar--get-weekday-number byday)))
1880 (let ((ex-dates (icalendar--get-event-properties e 'EXDATE)))
1894 (if (icalendar--get-event-property e 'EXRULE)
1898 (icalendar--get-event-properties