;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 "\301\302!\210\301\303!\210\301\304!\210\305\211\207" [make-backup-files require ox webfeeder webfeeder-test nil] 3) #@21 (fn INPUT OUTPUT) (defalias 'webfeeder-test--export #[514 "\300\301!r\211q\210\302\303\304\305\306!\307\"\310$\216\311!\210\312\313\"*\207" [generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 insert-file-contents org-export-to-file html] 9 (#$ . 537)]) #@23 (fn DIR &rest BODY) (defalias 'with-directory-excursion '(macro . #[385 "\301\302\303BB\304\300DC\305DBBBE\207" [default-directory progn mkdir ('parents) let cd] 8 (#$ . 871)])) (byte-code "\300\301\302\303#\300\207" [function-put with-directory-excursion lisp-indent-function defun] 4) #@130 Generate various feeds. We keep both libxml and default around to make sure our library can accommodate user's custom functions. (defalias 'webfeeder-test-gen-feeds #[0 "\305\306\"\210\307\310!\210\311\312\211\211:\203\377@\262\211A\262\242\262\211@\262\313\314\315\316\317\320\321\n#\322\323\324\325 \326\327\330\331\332\333&\f\210+\266\334\335\336\337\317\320\321\n#\322\323\340\325 \326\327\330\331\332\333&\f\210+\266\313\314\315\316\317\320\341\n#\322\323\342\325 \326\327\330\331\332\333&\f\210+\266\313\314\315\316\317\320\343\n#\322\323\344\325 \326\327\330\331\332\333\345\346&\210+\266\313\314\315\316\317\320\347\n#\322\323\350\325 \326\327\330\331\332\333&\f\210+\266\313\314\315\316\317\320\351\n#\322\323\352\325 \326\327\330\331\332\333&\f\210+\266A\262\202\312\266\204)\207" [webfeeder-test-dir default-directory webfeeder-body-function webfeeder-title-function webfeeder-date-function mkdir parents "/root/.emacs.d/elpa/webfeeder-1.1.2/" cd (("atom" webfeeder-make-atom) ("rss" webfeeder-make-rss)) nil webfeeder-date-libxml webfeeder-title-libxml webfeeder-body-libxml "libxml" webfeeder-build format "%s-post0.%s" "." "https://example.org/" ("post0-html5-fancy.html") :builder :title "Example feed" :description "Example description" :build-date 0 webfeeder-date-default webfeeder-title-default webfeeder-body-default "default" ("post0-html5-fancy.html") "%s-post0+post1.%s" ("post0-html5-fancy.html" "post1-html5-fancy.html") "%s-post1.%s" ("post0-html5-fancy.html" "post1-html5-fancy.html") :max-entries 1 "%s-post0-no-html.%s" ("post0.html") "%s-post0-no-fancy.%s" ("post0-html5.html")] 23 (#$ . 1172)]) (defalias 'webfeeder-test-gen #[0 "\306\307\"\210\310\311!\210\312\211\205K\211@\313\314\"\315\211\316\313\317\"\"\210*\315\211\320\316\313\321\"\"\210+\315\211\320\322\316\313\323\"\"\210,\210A\266\202\202\f\262)\207" [webfeeder-test-dir default-directory org-html-head-include-scripts org-html-head-include-default-style org-html-doctype org-html-html5-fancy mkdir parents "/root/.emacs.d/elpa/webfeeder-1.1.2/" cd ("post0" "post1") format "%s.org" nil webfeeder-test--export "%s.html" "html5" "%s-html5.html" t "%s-html5-fancy.html"] 8])