;ELC   
;;; Compiled
;;; in Emacs version 27.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
     (< (aref emacs-version (1- (length emacs-version))) ?A)
     (string-lessp emacs-version "23")
     (error "`%s' was compiled for Emacs 23 or later" #$))

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


(defvar use-package--warning66 #[(keyword err) "\303\304\305\306	!$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" elpher error-message-string display-warning use-package :error] 6])
(byte-code "\3021 \3030\207	\304\")\207" [err use-package--warning66 (debug error) nil :catch] 3)
(defvar use-package--warning67 #[(keyword err) "\303\304\305\306	!$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" visual-fill-column error-message-string display-warning use-package :error] 6])
(byte-code "\3021 \3030\207	\304\")\207" [err use-package--warning67 (debug error) nil :catch] 3)
(defvar gemlog-directory (expand-file-name "~/hobbies/l-3.space/"))
(defvar gemlog-file-name "%y%02m%02d")
(defvar gemlog-time-string "%Y-%02m-%02d %02Hh%02M %Z")
(defvar gemlog-time-zone "UTC")
(defalias 'gemlog-new-entry #[nil "\306\307!\310\311\312\n\313\314\315#	$\316\f!\203( 	T\311\312\n\313\314\315#	$\202 \317\f!\210\320\321!\210\320\322!\210\323c\210\324 \210\324 \210\325\261\210\324 \210\324 \210\326 +\207" [title number gemlog-directory gemlog-file-name file gemlog-time-zone read-string "Title: " 1 format "%s/log-%s-%d.gmi" format-time-string nil t file-exists-p find-file make-local-variable time-stamp-time-zone time-stamp-format "Time-stamp: <>" newline "# " time-stamp gemlog-time-string] 7 nil nil])
(defvar gemini-footnote-symbols '("⁰" "¹" "²" "³" "⁴" "⁵" "⁶" "⁷" "⁸" "⁹" "ᵃ" "ᵇ" "ᶜ" "ᵈ" "ᵉ" "ᶠ"))
(defalias 'gemini-insert-footnote #[nil "@\303\211\203! \212\304 \210\305\n\306\307#)\203! 	T\2118\211\204	 \n\204+ \310\311!\202? \nc\210\312 \210`\313 U\204; \314 \210\n\315\261*\207" [gemini-footnote-symbols n symb 0 beginning-of-buffer search-forward nil t message "Ran out of footnote symbols. Customise `gemini-footnote-symbols'." end-of-buffer point-at-bol newline " "] 5 nil nil])
(defvar use-package--warning68 #[(keyword err) "\303\304\305\306	!$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" gemini-mode error-message-string display-warning use-package :error] 6])
(byte-code "\3061\227 \307\310!\204 \311\310\312\313\314$\210\315\316\317\"\210\320\302!\203\221 \321\322!\203( \202+ \323!\n\203: \n9\203: \nJ\202; \n\206? ;\203I \202L \324!\n9\203U \n\202V \302B\325\f	\"\326\"\310\247?\205m D\211 \203  \241\210\202\207 \327\330B\"\210*\331\f	\310#-\202\225 \332\333\334\"0\207!\"\335!\")\207" [#:name #:key gemini-mode-map global-map #:kmap #:kdesc (debug error) fboundp gemini-insert-footnote autoload "gemini-mode" nil t add-hook gemini-mode-hook #[nil "\n\305\304!\210\306\307\310!\210\311\312!\207" [gemlog-time-zone time-stamp-time-zone gemlog-time-string time-stamp-format indent-tabs-mode make-local-variable nil auto-fill-mode -1 set-fill-column 80] 2] boundp #1="C-c C-f" vectorp read-kbd-macro key-description lookup-key assoc add-to-list personal-keybindings define-key eval-after-load gemini-mode #[nil "\306\307!\203\f \202 \310!\n\203 \n9\203 \nJ\202 \n\206# ;\203- \2020 \311!\n9\2039 \n\202: \302B\312\f	\"\313\"\314\247?\205Q D\211\203c \241\210\202k \315\316B\"\210*\317\f	\314#-\207" [#:name #:key gemini-mode-map global-map #:kmap #:kdesc #1# vectorp read-kbd-macro key-description lookup-key assoc gemini-insert-footnote add-to-list personal-keybindings define-key #:binding details entry] 5] :catch #:binding details entry err use-package--warning68] 6)
