;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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'image)
#@64 Image formats to try (in that order) when loading Rudel icons.
(defconst rudel-icons-image-formats '(svg png) (#$ . 425))
#@40 Directory that holds Rudel icon files.
(defvar rudel-icons-directory (byte-code "\301\302!\303P!\207" [load-file-name file-name-as-directory file-name-directory "icons"] 3) (#$ . 553))
#@183 Load image from Rudel icon directory and define image named NAME.
Optional argument DOCSTRING is the documentation string to
associate with the image.

(fn NAME &optional DOCSTRING)
(defalias 'rudel-defimage '(macro . #[513 "\301\302\303\"!\304\305\306\307\310\311!\312\"\313\314%\"\315\316\317\206' \302\320\321!\"FE\207" [rudel-icons-image-formats intern format "rudel-icon-%s" mapcar make-byte-code 257 "\301\302\303\304\305\306\300\307\310\n!Q\257\207" vconcat vector [:type :ascent center :mask heuristic :file "." symbol-name] 12 "\n\n(fn TYPE)" let ((image-load-path (list rudel-icons-directory))) defimage "%s icon." capitalize] 13 (#$ . 746)]))
(byte-code "\302\303\304\305#C\306\307\310!!\210)C\311\307\312!!\210)C\313\307\314!!\210)C\315\307\316!!\210)C\317\307\320!!\210)C\321\307\322!!\210)\323\324!\207" [rudel-icons-directory image-load-path function-put rudel-defimage doc-string-elt 2 (lambda (#1=#:def-tmp-var) (defvar rudel-icon-person #1# "Person icon.")) find-image ((:type svg :ascent center :mask heuristic :file "person.svg") (:type png :ascent center :mask heuristic :file "person.png")) (lambda (#1#) (defvar rudel-icon-document #1# "Document icon.")) ((:type svg :ascent center :mask heuristic :file "document.svg") (:type png :ascent center :mask heuristic :file "document.png")) (lambda (#1#) (defvar rudel-icon-connected #1# "Connected icon.")) ((:type svg :ascent center :mask heuristic :file "connected.svg") (:type png :ascent center :mask heuristic :file "connected.png")) (lambda (#1#) (defvar rudel-icon-disconnected #1# "Disconnected icon.")) ((:type svg :ascent center :mask heuristic :file "disconnected.svg") (:type png :ascent center :mask heuristic :file "disconnected.png")) (lambda (#1#) (defvar rudel-icon-plaintext #1# "Plaintext icon.")) ((:type svg :ascent center :mask heuristic :file "plaintext.svg") (:type png :ascent center :mask heuristic :file "plaintext.png")) (lambda (#1#) (defvar rudel-icon-encrypted #1# "Encrypted icon.")) ((:type svg :ascent center :mask heuristic :file "encrypted.svg") (:type png :ascent center :mask heuristic :file "encrypted.png")) provide rudel-icons] 4)