diff options
author | Nils Gey <denemo@nilsgey.de> | 2011-02-14 02:13:47 +0100 |
---|---|---|
committer | Nils Gey <denemo@nilsgey.de> | 2011-02-14 02:13:47 +0100 |
commit | 2f78aa7b83480d79f43be00316703f5b7697ad59 (patch) | |
tree | fc016eda45eaf96fa8d216a2c49077b7fe52b217 | |
parent | 95b8d674b1618fc706c561e6014c55be276d5435 (diff) |
Add (Selection?) to test if there is a selection and if working with selections is allowed by Denemos preferences
-rw-r--r-- | actions/denemo.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/actions/denemo.scm b/actions/denemo.scm index 6a6a9106..97de1123 100644 --- a/actions/denemo.scm +++ b/actions/denemo.scm @@ -283,6 +283,9 @@ (define (Appending?) (if (string=? (d-GetType) "Appending") #t #f)) +(define (Selection?) + (and DenemoPref_applytoselection (d-MarkStatus))) + ;;;;; End set of questions |