aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman2007-09-23 14:23:33 +0000
committerRichard M. Stallman2007-09-23 14:23:33 +0000
commit7c4d5b8abb9b44925f547e733458242f37bb386a (patch)
tree6427892eff3387455ba58d69738a266ce014afe2 /lisp
parentdd1fdb7485b630cf7d345a88ecb3549acb36c951 (diff)
downloademacs-7c4d5b8abb9b44925f547e733458242f37bb386a.tar.gz
emacs-7c4d5b8abb9b44925f547e733458242f37bb386a.zip
(org-confirm-shell-link-function, org-confirm-elisp-link-function): Doc fixes.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/textmodes/org.el22
2 files changed, 16 insertions, 11 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ff71370c753..bc9f5b5dea7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12007-09-23 Richard Stallman <rms@gnu.org>
2
3 * textmodes/org.el (org-confirm-shell-link-function)
4 (org-confirm-elisp-link-function): Doc fixes.
5
12007-09-23 Glenn Morris <rgm@gnu.org> 62007-09-23 Glenn Morris <rgm@gnu.org>
2 7
3 * ses.el (ses-calculate-cell): Don't evaluate unsafe formulae. 8 * ses.el (ses-calculate-cell): Don't evaluate unsafe formulae.
diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el
index 1d60d452ab0..246c9ae4dcb 100644
--- a/lisp/textmodes/org.el
+++ b/lisp/textmodes/org.el
@@ -1231,15 +1231,15 @@ if one was given like in <mailto:arthur@galaxy.org::this subject>."
1231 1231
1232(defcustom org-confirm-shell-link-function 'yes-or-no-p 1232(defcustom org-confirm-shell-link-function 'yes-or-no-p
1233 "Non-nil means, ask for confirmation before executing shell links. 1233 "Non-nil means, ask for confirmation before executing shell links.
1234Shell links can be dangerous, just think about a link 1234Shell links can be dangerous: just think about a link
1235 1235
1236 [[shell:rm -rf ~/*][Google Search]] 1236 [[shell:rm -rf ~/*][Google Search]]
1237 1237
1238This link would show up in your Org-mode document as \"Google Search\" 1238This link would show up in your Org-mode document as \"Google Search\",
1239but really it would remove your entire home directory. 1239but really it would remove your entire home directory.
1240Therefore I *definitely* advise against setting this variable to nil. 1240Therefore we advise against setting this variable to nil.
1241Just change it to `y-or-n-p' of you want to confirm with a single key press 1241You can change it to `y-or-n-p' if you want to confirm
1242rather than having to type \"yes\"." 1242with a single keystroke instead of \"yes\"."
1243 :group 'org-link-follow 1243 :group 'org-link-follow
1244 :type '(choice 1244 :type '(choice
1245 (const :tag "with yes-or-no (safer)" yes-or-no-p) 1245 (const :tag "with yes-or-no (safer)" yes-or-no-p)
@@ -1247,16 +1247,16 @@ rather than having to type \"yes\"."
1247 (const :tag "no confirmation (dangerous)" nil))) 1247 (const :tag "no confirmation (dangerous)" nil)))
1248 1248
1249(defcustom org-confirm-elisp-link-function 'yes-or-no-p 1249(defcustom org-confirm-elisp-link-function 'yes-or-no-p
1250 "Non-nil means, ask for confirmation before executing elisp links. 1250 "Non-nil means, ask for confirmation before executing Emacs Lisp links.
1251Elisp links can be dangerous, just think about a link 1251Emacs Lisp links can be dangerous: just think about a link
1252 1252
1253 [[elisp:(shell-command \"rm -rf ~/*\")][Google Search]] 1253 [[elisp:(shell-command \"rm -rf ~/*\")][Google Search]]
1254 1254
1255This link would show up in your Org-mode document as \"Google Search\" 1255This link would show up in your Org-mode document as \"Google Search\",
1256but really it would remove your entire home directory. 1256but really it would remove your entire home directory.
1257Therefore I *definitely* advise against setting this variable to nil. 1257Therefore we advise against setting this variable to nil.
1258Just change it to `y-or-n-p' of you want to confirm with a single key press 1258You can change it to `y-or-n-p' if you want to confirm
1259rather than having to type \"yes\"." 1259with a single keystroke instead of \"yes\"."
1260 :group 'org-link-follow 1260 :group 'org-link-follow
1261 :type '(choice 1261 :type '(choice
1262 (const :tag "with yes-or-no (safer)" yes-or-no-p) 1262 (const :tag "with yes-or-no (safer)" yes-or-no-p)