Function: gnus-icalendar-event:uid

gnus-icalendar-event:uid is a byte-compiled function defined in gnus-icalendar.el.gz.

Signature

(gnus-icalendar-event:uid ARG &rest ARGS)

Implementations

(gnus-icalendar-event:uid (THIS gnus-icalendar-event)) in `gnus-icalendar.el'.

Retrieve the slot `uid' from an object of class `gnus-icalendar-event'.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-icalendar.el.gz
;; Could not find source code, showing raw function object.
#[385
  "\304\305!\306\300\"\206\"�\307\303\310\302\301\311\312\305!!\313\314!\"%\315\300#\210\262#\207"
  [#s(hash-table)
     (#s(cl--generic-method (gnus-icalendar-event) nil nil
			    #[257 "\300\301\"\207" [slot-value uid]
				  4
				  ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/gnus/gnus-icalendar.elc"
				   . 897)]))
     nil
     #s(cl--generic gnus-icalendar-event:uid
		    ((0
		      #s(cl--generic-generalizer
			 eieio--generic-generalizer 50
			 cl--generic-struct-tag
			 #[385 "\301N\302!>\205�\303!\207"
			       [cl-struct-eieio--class-tags cl--class
							    type-of
							    cl--class-allparents]
			       5
			       ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/emacs-lisp/eieio-core.elc"
				. 38229)])
		      #s(cl--generic-generalizer
			 cl--generic-t-generalizer 0
			 #[385 "\300\207" [nil] 3
			       ("emacs-lisp/cl-generic.elc" . 6935)]
			 #[385 "\300\207" [(t)] 3
			       ("emacs-lisp/cl-generic.elc" . 6960)])))
		    (#s(cl--generic-method (gnus-icalendar-event) nil
					   nil
					   #[257 "\300\301\"\207"
						 [slot-value uid] 4
						 ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/gnus/gnus-icalendar.elc"
						  . 897)]))
		    nil)
     apply cl-type-of gethash cl--generic-cache-miss 0 append
     #[385 "\301N\302!>\205�\303!\207"
	   [cl-struct-eieio--class-tags cl--class type-of
					cl--class-allparents]
	   5
	   ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/emacs-lisp/eieio-core.elc"
	    . 38229)]
     #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 6960)]
     nil puthash]
  13 "\n\n(fn ARG &rest ARGS)"]