Merge pull request #289 from intersystems/add-custom-pull-handlers

Add custom pull handlers

Author: isc-tleavitt

CHANGELOG.md

@@ -16,6 +16,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 - Fatal: bad revision HEAD fixed using an empty commmit (#228)
 - Fixed empty mappings when SourceControl.Git.Settings is instantiated (#250)
 - Studio export path doesn't get weird mixed slahes on Windows (#252)
+- Fixed custom PullHandlers not visible on settings UI (now all subclasses are visible) (#267)
 - Fixed bug with adding mappings through the Settings page (#270)
 - Pulling add/delete of multiple non-IRIS files no longer causes error (#273)
 - Fixed -2 timestamp for some items (#275)

csp/gitprojectsettings.csp

@@ -237,8 +237,14 @@ body {
             <label for="pullEventClass" class="col-sm-3 col-form-label"  data-toggle="tooltip" data-placement="top" title="Handler class for git pull">Pull Event Class</label>
             <div class="col-sm-7">
                 <select class="form-control" id="pullEventClass" name="pullEventClass">
-                    <option value="SourceControl.Git.PullEventHandler.Default" #($Case(settings.pullEventClass,"SourceControl.Git.PullEventHandler.Default":"selected",:""))#>Default</option>
-                    <option value="SourceControl.Git.PullEventHandler.PackageManager" #($Case(settings.pullEventClass,"SourceControl.Git.PullEventHandler.PackageManager":"selected",:""))#>PackageManager</option>
+                    <server>
+                        set rs = ##class(%Dictionary.ClassDefinition).SubclassOfFunc("SourceControl.Git.PullEventHandler")
+                        while rs.%Next() {
+                            set subclass = rs.%GetData(1)
+                            // create option with subclass, set selected if subclass == current pullEventClass
+                            &html<<option value=#(subclass)# #($CASE(subclass, settings.pullEventClass: "selected", :""))#>#($PIECE(subclass, ".", *-0))# </option>>
+                        }
+                    </server>
                 </select>
             </div>
         </div>