;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\305\307%\210\303\304\305\310\305\311%\207" [require rudel rudel-icons cl-generic-define-method rudel-display-string nil ((this rudel-user) &optional use-images _align) #[769 "\301\205 \301\302\303#\304\305\"P\306\307\304\310\"D#\207" [rudel-icon-person propertize "*" display slot-value :object-name face :background color] 11 "Return a textual representation of THIS for user interface purposes.\nWhen USE-IMAGES is non-nil, add an icon that indicates a user to\nthe text representation.\nWhen ALIGN is non-nil, align the text representation. If ALIGN is\nt, align it to a fixed width. When ALIGN is a number, align it to\na width equal to that number.\n\n(fn THIS &optional USE-IMAGES ALIGN)"] ((this rudel-document) &optional use-images _align) #[769 "\205\n\301\302\303#\304\305\"P\207" [rudel-icon-document propertize "*" display slot-value :object-name] 8 "Return a textual representation of THIS for user interface purposes.\nWhen USE-IMAGES is non-nil, add an icon that indicates a document\nto the text representation.\nWhen ALIGN is non-nil, align the text representation. If ALIGN is\nt, align it to a fixed width. When ALIGN is a number, align it to\na width equal to that number.\n\n(fn THIS &optional USE-IMAGES ALIGN)"]] 6) #@315 Return a textual representation of USER-LIST for user interface purposes. String representations of users are separated by the string SEPARATOR or " " when SEPARATOR is nil. USE-IMAGES and ALIGN are passed to the `rudel-display-string' method for the user class. (fn OBJECTS &optional SEPARATOR USE-IMAGES ALIGN) (defalias 'rudel-display-object-list-string #[1025 "\300\301\302\303\304\305\"\306\"\307\310%\206\311#\207" [mapconcat make-byte-code 257 "\302\300\301#\207" vconcat vector [rudel-display-string] 5 "\n\n(fn OBJECT)" " "] 12 (#$ . 1714)]) (provide 'rudel-display)