# HG changeset patch # User Stefan Vogel # Date 1558103790 -7200 # Node ID 63a44a9fdc42cf0f429491c735a821a27436f078 # Parent a93fa8f9a2a3583cdc1dd9953318d40d37083ee5 #REFACTORING by stefan Sanitize BlockValues class: WorkspaceApplication changed: #manageSnippets diff -r a93fa8f9a2a3 -r 63a44a9fdc42 WorkspaceApplication.st --- a/WorkspaceApplication.st Thu May 16 02:04:02 2019 +0200 +++ b/WorkspaceApplication.st Fri May 17 16:36:30 2019 +0200 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 2001 by eXept Software AG All Rights Reserved @@ -3007,7 +3005,7 @@ ]. ]. - hasSelectionHolder := BlockValue with:[:m | m value notNil] argument:selectedSnippetHolder. + hasSelectionHolder := BlockValue with:[:m | m notNil] argument:selectedSnippetHolder. removeEnabledHolder := hasSelectionHolder. pasteEnabledHolder := hasSelectionHolder. defineEnabledHolder := @@ -3110,6 +3108,8 @@ selectedSnippetsKeyHolder onChangeEvaluate:[defineEnabledHolder recomputeValue ]. self openDialogInterface:#manageSnippetsDialogSpec withBindings:bindings + + "Modified: / 17-05-2019 / 15:59:10 / Stefan Vogel" ! menuSQLConnect