aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2013-05-23 20:42:55 -0700
committerGlenn Morris2013-05-23 20:42:55 -0700
commitdb785726ccd9d3788c5c0ae70c59ea67d3a64447 (patch)
tree5238844762376e1cc8f4e73739fb0f05d0a330fa
parentb3531901c6c3cf932633b52ec96aff50470c997f (diff)
downloademacs-db785726ccd9d3788c5c0ae70c59ea67d3a64447.tar.gz
emacs-db785726ccd9d3788c5c0ae70c59ea67d3a64447.zip
* options.el (list-options): Use custom-variable-p, rather than obsolete alias.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/obsolete/options.el2
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b37e0aad393..ee17699eb40 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
12013-05-24 Glenn Morris <rgm@gnu.org>
2
3 * obsolete/options.el (list-options): Use custom-variable-p,
4 rather than obsolete alias.
5
12013-05-23 Sam Steingold <sds@gnu.org> 62013-05-23 Sam Steingold <sds@gnu.org>
2 7
3 * simple.el (shell-command-on-region): Pass the `replace' argument 8 * simple.el (shell-command-on-region): Pass the `replace' argument
4 down to `call-process-region' to comply witht he doc as reported on 9 down to `call-process-region' to comply with the doc as reported on
5 <http://stackoverflow.com/questions/16720458/emacs-noninteractive-call-to-shell-command-on-region-always-deletes-region> 10 <http://stackoverflow.com/questions/16720458/emacs-noninteractive-call-to-shell-command-on-region-always-deletes-region>
6 11
72013-05-23 Stefan Monnier <monnier@iro.umontreal.ca> 122013-05-23 Stefan Monnier <monnier@iro.umontreal.ca>
diff --git a/lisp/obsolete/options.el b/lisp/obsolete/options.el
index 3c9ebc839b8..f25003e5652 100644
--- a/lisp/obsolete/options.el
+++ b/lisp/obsolete/options.el
@@ -42,7 +42,7 @@ It is now better to use Customize instead."
42 (princ "This facility is obsolete; we recommend using M-x customize instead.") 42 (princ "This facility is obsolete; we recommend using M-x customize instead.")
43 43
44 (mapatoms (function (lambda (sym) 44 (mapatoms (function (lambda (sym)
45 (if (user-variable-p sym) 45 (if (custom-variable-p sym)
46 (setq vars (cons sym vars)))))) 46 (setq vars (cons sym vars))))))
47 (setq vars (sort vars 'string-lessp)) 47 (setq vars (sort vars 'string-lessp))
48 (while vars 48 (while vars