Mine

diff --git a/src-slftp/kb.pas b/src-slftp/kb.pasindex 722089a..130553f 100644--- a/src-slftp/kb.pas+++ b/src-slftp/kb.pas@@ -134,6 +134,7 @@ type     season: Integer;     premier_year: Integer;     country: string;+    classification: string;     scripted: Boolean;     genres: string;     network: string;@@ -1501,6 +1502,8 @@ begin     Result:= Result + 'Premier: '+IntToStr(premier_year) + #13#10;   if country <> '' then     Result:= Result + 'Country: '+country + #13#10;+  if classification <> '' then+    Result:= Result + 'Classification: ' + classification + #13#10;   Result:= Result + 'Scripted: '+IntToStr(Integer(scripted ))+ #13#10;   if genres <> '' then     Result:= Result + 'Genres: '+genres + #13#10;diff --git a/src-slftp/rulesunit.pas b/src-slftp/rulesunit.pasindex 91a9758..8a91e58 100644--- a/src-slftp/rulesunit.pas+++ b/src-slftp/rulesunit.pas@@ -539,6 +539,11 @@ type     class function Name: string; override;     class function Description: string; override;   end;+  TConditionTVClassification = class(TStringCondition)+    function SupplyValue(r: TPazo): string; override;+    class function Name: string; override;+    class function Description: string; override;+  end;   TConditionTVScripted = class(TBooleanCondition)     function SupplyValue(r: TPazo): Boolean; override;     class function Name: string; override;@@ -1602,6 +1607,7 @@ begin   conditions.Add(TConditionTVTag);   conditions.Add(TConditionTVPremierYear);   conditions.Add(TConditionTVCountry);+  conditions.Add(TConditionTVClassification);   conditions.Add(TConditionTVScripted);   conditions.Add(TConditionTVGenres);   conditions.Add(TConditionTVNetwork);@@ -2913,6 +2919,25 @@ begin     Result:= TTVRelease(r.rls).country; end; +{ TConditionTVClassication }++class function TConditionTVClassification.Description: string;+begin+  Result:= 'Returns with the Classification field parsed from tvrage.';+end;++class function TConditionTVClassification.Name: string;+begin+  Result:= 'tvclassification';+end;++function TConditionTVClassification.SupplyValue(r: TPazo): string;+begin+  Result:='';+  if r.rls is TTVRelease then+    Result:= TTVRelease(r.rls).classification;+end;+ { TConditionTVScripted }  class function TConditionTVScripted.Description: string;diff --git a/src-slftp/tasktvragelookup.pas b/src-slftp/tasktvragelookup.pasindex bad2bbe..bd77746 100644--- a/src-slftp/tasktvragelookup.pas+++ b/src-slftp/tasktvragelookup.pas@@ -116,7 +116,10 @@ Runtime@60       tr.runtime:= StrToIntDef(s, 0)     else     if AnsiSameText(ss, 'Classification') then-      tr.scripted:= AnsiSameText(s, 'Scripted')+    begin+      tr.classification:= s;+      tr.scripted:= AnsiSameText(s, 'Scripted');+    end;     ;   end;