Horse 2.0 #5

Author: viniciussanchez

samples/boss-lock.json

@@ -1,27 +1,19 @@
 {
-	"hash": "6ef9161b900632671022358216c7dfe7",
-	"updated": "2019-10-15T22:07:14.0506259-03:00",
+	"hash": "d41d8cd98f00b204e9800998ecf8427e",
+	"updated": "2020-09-04T08:21:10.615254-03:00",
 	"installedModules": {
-		"github.com/hashload/handle-exception": {
-			"name": "handle-exception",
-			"version": "0.1.2",
-			"hash": "519df8be252fbda605e46bef8d604915",
-			"artifacts": {},
-			"failed": false,
-			"changed": false
-		},
 		"github.com/hashload/horse": {
 			"name": "horse",
-			"version": "1.6.8",
-			"hash": "7a0b2394ac49dbd1a62f6d1021cac5b9",
+			"version": "v2.0.0",
+			"hash": "e37b9706c16357ab94219cf12b67b036",
 			"artifacts": {},
 			"failed": false,
 			"changed": false
 		},
 		"github.com/hashload/jhonson": {
 			"name": "jhonson",
-			"version": "1.0.3",
-			"hash": "334dfe6b2e7daa4cb6af5b1bf88ec76e",
+			"version": "1.0.5",
+			"hash": "34d01183ef1b6af802c7e132adedeae5",
 			"artifacts": {},
 			"failed": false,
 			"changed": false

samples/boss.json

@@ -6,8 +6,7 @@
 	"mainsrc": "./",
 	"projects": [],
 	"dependencies": {
-		"github.com/HashLoad/handle-exception": "^0.1.2",
-		"github.com/HashLoad/horse": "^1.6.8",
-		"github.com/hashload/jhonson": "^1.0.3"
+		"github.com/hashload/horse": "^v2.0.0",
+		"github.com/hashload/jhonson": "^1.0.5"
 	}
 }

samples/samples.dpr

@@ -1,29 +1,20 @@
 program samples;
 
 {$APPTYPE CONSOLE}
-
-uses
-  Horse,
-  Horse.Jhonson,
-  Horse.HandleException,
-  System.SysUtils;
-
 {$R *.res}
 
-var
-  App: THorse;
+uses Horse, Horse.Jhonson, Horse.HandleException, System.SysUtils;
 
 begin
-  App := THorse.Create(9000);
-
-  App.Use(Jhonson);
-  App.Use(HandleException);
+  THorse
+    .Use(Jhonson)
+    .Use(HandleException);
 
-  App.Get('ping',
+  THorse.Get('/ping',
     procedure(Req: THorseRequest; Res: THorseResponse; Next: TProc)
     begin
-      raise Exception.Create('My Error!');
+      raise EHorseException.Create('My Error!');
     end);
 
-  App.Start;
+  THorse.Listen(9000);
 end.

samples/samples.dproj

@@ -86,9 +86,9 @@
         <UsingDelphiRTL>true</UsingDelphiRTL>
         <Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\delphi_PROJECTICNS.icns</Icns_MainIcns>
-        <DCC_UnitSearchPath>$(Horse);modules\.dcp;modules\.dcu;modules;modules\handle-exception\Src;modules\horse\src;modules\jhonson\src;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
         <DCC_Framework>VCL;$(DCC_Framework)</DCC_Framework>
         <SanitizedProjectName>samples</SanitizedProjectName>
+        <DCC_UnitSearchPath>modules\.dcp;modules\.dcu;modules;modules\horse\src;modules\jhonson\src;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Base_Android)'!=''">
         <DCC_UsePackage>DBXSqliteDriver;RESTComponents;DBXInterBaseDriver;emsclientfiredac;tethering;DataSnapFireDAC;bindcompfmx;fmx;FireDACIBDriver;FireDACDBXDriver;dbexpress;IndyCore;dsnap;emsclient;DataSnapCommon;FireDACCommon;RESTBackendComponents;soapserver;bindengine;CloudService;FireDACCommonDriver;DataSnapClient;inet;IndyIPCommon;bindcompdbx;IndyIPServer;IndySystem;fmxFireDAC;FireDAC;FireDACSqliteDriver;soaprtl;DbxCommonDriver;xmlrtl;soapmidas;DataSnapNativeClient;FireDACDSDriver;rtl;DbxClientDriver;CustomIPTransport;bindcomp;IndyIPClient;dbxcds;dsnapxml;DataSnapProviderClient;dbrtl;IndyProtocols;$(DCC_UsePackage)</DCC_UsePackage>
@@ -132,6 +132,9 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
         <DCC_RemoteDebug>false</DCC_RemoteDebug>
+        <VerInfo_Locale>1033</VerInfo_Locale>
+        <Manifest_File>(None)</Manifest_File>
+        <DCC_UnitSearchPath>..\src;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
@@ -163,6 +166,11 @@
                 <Source>
                     <Source Name="MainSource">samples.dpr</Source>
                 </Source>
+                <Excluded_Packages>
+                    <Excluded_Packages Name="$(BDSBIN)\dclDataSnapNativeServer260.bpl">Embarcadero DBExpress DataSnap Native Server Components</Excluded_Packages>
+                    <Excluded_Packages Name="$(BDSBIN)\dcloffice2k260.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+                    <Excluded_Packages Name="$(BDSBIN)\dclofficexp260.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+                </Excluded_Packages>
             </Delphi.Personality>
             <Deployment Version="3">
                 <DeployFile LocalName="$(BDS)\Redist\osx32\libcgunwind.1.0.dylib" Class="DependencyModule">