;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\316\317%\210\310\320\312\313\321DD\322\316\323%\210\310\324\312\313\325DD\326\316\327%\210\310\330\312\313\331DD\332\316\333%\210\310\334\312\313\335DD\336\316\337%\210\310\340\312\313\341DD\342\316\343%\210\310\344\312\313\345DD\346\316\347%\210\310\350\312\313\351DD\352\316\347%\207" [custom-declare-group savehist nil "Save minibuffer history." :version "22.1" :group minibuffer custom-declare-variable savehist-save-minibuffer-history funcall function #[0 "\300\207" [t] 1 #1=""] "If non-nil, save all recorded minibuffer histories.\nIf you want to save only specific histories, use `savehist-save-hook'\nto modify the value of `savehist-minibuffer-history-variables'." :type boolean savehist-additional-variables #[0 "\300\207" [nil] 1 #1#] "List of additional variables to save.\nEach element is a symbol whose value will be persisted across Emacs\nsessions that use Savehist.  The contents of variables should be\nprintable with the Lisp printer.  You don't need to add minibuffer\nhistory variables to this list, all minibuffer histories will be\nsaved automatically as long as `savehist-save-minibuffer-history' is\nnon-nil.\n\nUser options should be saved with the Customize interface.  This\nlist is useful for saving automatically updated variables that are not\nminibuffer histories, such as `compile-command' or `kill-ring'." (repeat variable) savehist-ignored-variables #[0 "\300\207" [nil] 1 #1#] "List of additional variables not to save." (repeat variable) savehist-file #[0 "\300\301\302\"\207" [locate-user-emacs-file "history" ".emacs-history"] 3 #1#] "File name where minibuffer history is saved to and loaded from.\nThe minibuffer history is a series of Lisp expressions loaded\nautomatically when Savehist mode is turned on.  See `savehist-mode'\nfor more details." file savehist-file-modes #[0 "\300\207" [384] 1 #1#] "Default permissions of the history file.\nThis is decimal, not octal.  The default is 384 (0600 in octal).\nSet to nil to use the default permissions that Emacs uses, typically\nmandated by umask.  The default is a bit more restrictive to protect\nthe user's privacy." integer savehist-autosave-interval #[0 "\300\207" [300] 1 #1#] "The interval between autosaves of minibuffer history.\nIf set to nil, disables timer-based autosaving." (choice (const :tag "Disabled" nil) (integer :tag "Seconds")) savehist-mode-hook #[0 "\300\207" [nil] 1 #1#] "Hook called when Savehist mode is turned on." hook savehist-save-hook #[0 "\300\207" [nil] 1 #1#] "Hook called by `savehist-save' before saving the variables.\nYou can use this hook to influence choice and content of variables\nto save."] 8)
#@184 The coding system Savehist uses for saving the minibuffer history.
Changing this value while Emacs is running is supported, but considered
unwise, unless you know what you are doing.
(defvar savehist-coding-system 'utf-8-unix (#$ . 2796))
(defvar savehist-timer nil)
(defvar savehist-last-checksum nil)
#@226 List of minibuffer histories.
The contents of this variable is built while Emacs is running, and saved
along with minibuffer history.  You can change its value off
`savehist-save-hook' to influence which variables are saved.
(defvar savehist-minibuffer-history-variables nil (#$ . 3106))
#@128 Whether the history has already been loaded.
This prevents toggling Savehist mode from destroying existing
minibuffer history.
(defvar savehist-loaded nil (#$ . 3401))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\207" [custom-declare-variable savehist-mode funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil if Savehist mode is enabled.\nSee the `savehist-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `savehist-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean] 10)
#@1842 Toggle saving of minibuffer history (Savehist mode).

This is a minor mode.  If called interactively, toggle the `Savehist
mode' mode.  If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value \='savehist-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

When Savehist mode is enabled, minibuffer history is saved
to `savehist-file' periodically and when exiting Emacs.  When
Savehist mode is enabled for the first time in an Emacs session,
it loads the previous minibuffer histories from `savehist-file'.
The variable `savehist-autosave-interval' controls the
periodicity of saving minibuffer histories.

If `savehist-save-minibuffer-history' is non-nil (the default),
all recorded minibuffer histories will be saved.  You can arrange
for additional history variables to be saved and restored by
customizing `savehist-additional-variables', which by default is
an empty list.  For example, to save the history of commands
invoked via \[execute-extended-command], add `command-history' to the list in
`savehist-additional-variables'.

Alternatively, you could customize `savehist-save-minibuffer-history'
to nil, and add to `savehist-additional-variables' only those
history variables you want to save.

To ignore some history variables, add their symbols to the list
in `savehist-ignored-variables'.

This mode should normally be turned on from your Emacs init file.
Calling it at any other time replaces your current minibuffer
histories, which is probably undesirable.

(fn &optional ARG)
(defalias 'savehist-mode #[256 "\304 \305\301\306=\203\307\301!?\202!\247\203 \310W\203 \311\202!\312\"\210\313\300!\2038\314\301\"\307\301!\2038\301B	\204B\315 \210\202q\n\204n\316!\203n\3171a\320\311\321\322!?#\210\312\2110\210\202n\311\315 \210\323
@A\"\266\324 \210\325\326\307\301!\203}\327\202~\330\"\210\321\331!\203\246\332\301!\210\304 \203\226\211\304 \232\203\246\333\334\307\301!\203\242\335\202\243\336\337#\210\210\340 \210\307\301!\207" [global-minor-modes savehist-mode savehist-loaded savehist-file current-message set-default toggle default-value 1 nil t boundp delq savehist-uninstall file-exists-p (error) load called-interactively-p interactive signal savehist-install run-hooks savehist-mode-hook savehist-mode-on-hook savehist-mode-off-hook any customize-mark-as-set message "Savehist mode %sabled%s" "en" "dis" "" force-mode-line-update] 7 (#$ . 4080) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar savehist-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [savehist-mode-map savehist-mode-hook variable-documentation put "Hook run after entering or leaving `savehist-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode savehist-mode boundp] 6)
#@201 Hook Savehist into Emacs.
Normally invoked by calling `savehist-mode' to set the minor mode.
Installs `savehist-autosave' in `kill-emacs-hook' and on a timer.
To undo this, call `savehist-uninstall'.
(defalias 'savehist-install #[0 "\302\303\304\"\210\302\305\306\"\210\205	?\205\307\211\306#\211\207" [savehist-autosave-interval savehist-timer add-hook minibuffer-setup-hook savehist-minibuffer-hook kill-emacs-hook savehist-autosave run-with-timer] 4 (#$ . 7424)])
#@96 Undo installing savehist.
Normally invoked by calling `savehist-mode' to unset the minor mode.
(defalias 'savehist-uninstall #[0 "\301\302\303\"\210\301\304\305\"\210\205\306!\210\307\211\207" [savehist-timer remove-hook minibuffer-setup-hook savehist-minibuffer-hook kill-emacs-hook savehist-autosave cancel-timer nil] 3 (#$ . 7904)])
(defvar savehist--has-given-file-warning nil)
#@275 Save the values of minibuffer history variables.
Unbound symbols referenced in `savehist-additional-variables' are ignored.
If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
 and don't save the buffer if they are the same.

(fn &optional AUTO-SAVE)
(defalias 'savehist-save #[256 "\306\307\310\"r\211q\210\311\312\"\216\313\314\"c\210\315\316!\210\317\211\310\f\203\270\320\321\305\322
DEp\"\210\323c\210
\211\203\267\211@\324
!\203\260\211.>\204\260\211J\317
\203\256\325c\210\320p\"\210\326c\210`\262

\211\203\232\211@`\327c\210\3301x\320p\"\210\212\211b\210\331p!)0\210\202\217\210\211b\210\332c\210m\204\214\333c\210\334y\210\202\332c\210db\266
A\266\202\202X\210\212\211b\210g\335=\203\252``T|\210)\336c\210\266
A\266\202\202/\210/\211\203\343\211@\324
!\203\334\211J\337
!\203\333\320\321\322DEp\"\210\323c\210\210
A\266\202\202\272\210+\340p\317\211$\34119
\205\367\2110\232?\2055
\310\3421!
23\343
!\204
\344
\310\"\210\345ed1\317\346\347!?\205 
\350%\210*\2664\2031
\35114\"\210\211\21100\202Q
5?\205O
\352\353\354\3551AA@%\210\310\2115\262
\262
*\207" [savehist-coding-system print-quoted print-level print-length savehist-save-minibuffer-history savehist-minibuffer-history-variables generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] format-message ";; -*- mode: emacs-lisp; coding: %s -*-\n;; Minibuffer history file, automatically generated by `savehist'.\n\n" run-hooks savehist-save-hook nil prin1 setq quote 10 boundp "(setq " " '(" " " (error) read "\n" ";;; " 1 32 "))\n" savehist-printable md5 (file-error) file-name-directory file-exists-p make-directory write-region called-interactively-p interactive quiet set-file-modes lwarn (savehist-file) :warning "Error writing `%s': %s" savehist-ignored-variables savehist-additional-variables savehist-last-checksum savehist-file coding-system-for-write file-precious-flag savehist-file-modes savehist--has-given-file-warning] 13 (#$ . 8298) nil])
#@112 Save the minibuffer history if it has been modified since the last save.
Does nothing if Savehist mode is off.
(defalias 'savehist-autosave #[0 "\205\301\302!\207" [savehist-mode savehist-save t] 2 (#$ . 10356)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias savehist-trim-history identity nil make-obsolete "27.1"] 4)
#@51 Return non-nil if VALUE is printable.

(fn VALUE)
(defalias 'savehist-printable #[257 "\211\247\206@\2119\206@\211;\203\301
\302!\"\206@\303\304\305\"r\211q\210\306\307\"\216\3101;\311\312p\"\210\313\314 !\210)\3050\202=\210\311*\262
\207" [print-level equal-including-properties substring-no-properties generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] (error) nil prin1 read point-min-marker] 5 (#$ . 10704)])
(defalias 'savehist-minibuffer-hook #[0 "\303=\206		>?\205\n\235\203\n\207\nB\211\207" [minibuffer-history-variable savehist-ignored-variables savehist-minibuffer-history-variables t] 2])
(provide 'savehist)