paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-26 18:23:46 +02:00
Code Issues Packages Projects Releases Wiki Activity

Printers: do not pass to CUPS localized parameter values, localize 'Pages' combobox differently

Browse Source 
git-svn-id: trunk@58651 -
This commit is contained in:
maxim 2018-07-29 23:45:10 +00:00
parent 3b03f1ddf5
commit a120f243bd
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/printers/unix/udlgselectprinter.pp
View File

@ -336,9 +336,9 @@ begin
if edPageSet.ItemIndex>0 then
begin
if edPageSet.ItemIndex=1 then
St:=p4lrsPageOdd
St:='Odd'
else
St:=p4lrsPageEven;
St:='Even';
THackCUPSPrinter(Printer).cupsAddOption('page-set',St);
end;
if cbCollate.Checked then
@ -407,6 +407,9 @@ begin
if Sender=nil then ;
fPropertiesSetting:=False;
NbOpts.PageIndex:=0;
edPageSet.Items[0]:=p4lrsAllPages;
edPageSet.Items[1]:=p4lrsPageOdd;
edPageSet.Items[2]:=p4lrsPageEven;
end;
//Show corresponding image