Changeset 24 for trunk/Backends/Bazaar/Bazaar.pas

Timestamp:

Apr 5, 2025, 9:45:07 PM (12 days ago)

Author:

chronos

Message:

• Fixed: Test cases executed with FormTests form from Common package.

File:

• trunk/Backends/Bazaar/Bazaar.pas (modified) (2 diffs)

trunk/Backends/Bazaar/Bazaar.pas

@@ -24 +24 @@
     procedure Update; override;
     procedure CleanUp; override;
-    procedure Commit(Message: TStrings); override;
+    procedure Commit(Message: string); override;
     procedure Move(Source, Dest: string); override;
     procedure Merge; override;
@@ -77 +77 @@
 end;
 
-procedure TBazaar.Commit(Message: TStrings);
+procedure TBazaar.Commit(Message: string);
 begin
-  Execute(['commit', '-m "' + Message.Text + '"']);
+  Execute(['commit', '-m "' + Message + '"']);
 end;