aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/files.el7
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e214ec1d66..428ea4fffde 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12014-08-12 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * files.el (out-of-memory-warning-percentage): Turn it off by default.
4
12014-08-11 Sam Steingold <sds@gnu.org> 52014-08-11 Sam Steingold <sds@gnu.org>
2 6
3 * textmodes/sgml-mode.el (sgml-validate-command): Set depending on 7 * textmodes/sgml-mode.el (sgml-validate-command): Set depending on
diff --git a/lisp/files.el b/lisp/files.el
index a9a279b2fa4..edbf647530c 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1786,12 +1786,13 @@ When nil, never request confirmation."
1786 :version "22.1" 1786 :version "22.1"
1787 :type '(choice integer (const :tag "Never request confirmation" nil))) 1787 :type '(choice integer (const :tag "Never request confirmation" nil)))
1788 1788
1789(defcustom out-of-memory-warning-percentage 50 1789(defcustom out-of-memory-warning-percentage nil
1790 "Warn if file size exceeds this percentage of available free memory. 1790 "Warn if file size exceeds this percentage of available free memory.
1791When nil, never issue warning." 1791When nil, never issue warning. Beware: This probably doesn't do what you
1792think it does, because \"free\" is pretty hard to define in practice."
1792 :group 'files 1793 :group 'files
1793 :group 'find-file 1794 :group 'find-file
1794 :version "24.4" 1795 :version "24.5"
1795 :type '(choice integer (const :tag "Never issue warning" nil))) 1796 :type '(choice integer (const :tag "Never issue warning" nil)))
1796 1797
1797(defun abort-if-file-too-large (size op-type filename) 1798(defun abort-if-file-too-large (size op-type filename)