diff --git a/APLSource/Main-1/BuildWorkspace_-21.aplf b/APLSource/Main-1/BuildWorkspace_-21.aplf
index 7727252..8769d4f 100644
--- a/APLSource/Main-1/BuildWorkspace_-21.aplf
+++ b/APLSource/Main-1/BuildWorkspace_-21.aplf
@@ -21,6 +21,7 @@
      s.AcreConfig←s.⎕NS m
      _←s∘SetReferences¨s
      #.⎕LX←SetQuadLX↑s
+     _←(↑s)Execute'OnSave'
      _←0 ⎕SAVE af,c._Name,'.dws'
      0 'OK'
  }