Doing a simple Perltidy commit so that I can evaluate differences between the branches and make sure patches are up to date

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1103 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 20 insertions, 20 deletions

diff --git a/drivers/pd3000.pl b/drivers/pd3000.pl
index a73ae932..a621a3ac 100644
--- a/drivers/pd3000.pl
+++ b/drivers/pd3000.pl
@@ -8,16 +8,16 @@
 # with permission.
 #
 # This file contains source code included with or based on SQL-Ledger which
-# is Copyright Dieter Simader and DWS Systems Inc. 2000-2005 and licensed 
-# under the GNU General Public License version 2 or, at your option, any later 
-# version.  For a full list including contact information of contributors, 
+# is Copyright Dieter Simader and DWS Systems Inc. 2000-2005 and licensed
+# under the GNU General Public License version 2 or, at your option, any later
+# version.  For a full list including contact information of contributors,
 # maintainers, and copyright holders, see the CONTRIBUTORS file.
 # Driver for Logic Controls PD-3000 Pole Display.
 # As with all pole display drivers, the control codes are contained in a hash
 # array called $pd_control.
 
 # THis pole display uses separate meanings for LF and CR.  Both are included.
-# LF moves the cursor to the other line (same position), while CR moves the 
+# LF moves the cursor to the other line (same position), while CR moves the
 # cursor to the left-most spot (same line).  Assume most PD's do this.
 # Most of this is simple ASCII, but what to make things clear.
 
@@ -25,23 +25,23 @@
 # Not including the bit about installing fonts.
 
 %pd_control = (
-  'mode_vscroll' => pack('C', 18),
-  'mode_normal' => pack('C', 17),
-  'bright_full' => pack('CC', 4, 0xFF),
-  'bright_high' => pack('CC', 4, 0x60),
-  'bright_med' => pack('CC', 4, 0x40),
-  'bright_low' => pack('CC', 4, 0x20),
-  'backspace' => pack('C', 8),
-  'htab' => pack('C', 9), # Functions like cursor movement
-  'lf' => pack('C', 0x0A),
-  'cr' => pack('C', 0x0D),
-  'digit_select' => pack('C', 0x10), # Pack followed by a number 0-39
-  'cursor_on' => pack('C', 0x13),
-  'cursor_off' => pack('C', 0x14),
-  'reset' => pack('C', 0x1F),
-  'scroll_message' => pack ('C', 0x05), # Followed by up to 45 chars.
+    'mode_vscroll'   => pack( 'C',  18 ),
+    'mode_normal'    => pack( 'C',  17 ),
+    'bright_full'    => pack( 'CC', 4, 0xFF ),
+    'bright_high'    => pack( 'CC', 4, 0x60 ),
+    'bright_med'     => pack( 'CC', 4, 0x40 ),
+    'bright_low'     => pack( 'CC', 4, 0x20 ),
+    'backspace'      => pack( 'C',  8 ),
+    'htab'           => pack( 'C',  9 ),        # Functions like cursor movement
+    'lf'             => pack( 'C',  0x0A ),
+    'cr'             => pack( 'C',  0x0D ),
+    'digit_select'   => pack( 'C',  0x10 ),     # Pack followed by a number 0-39
+    'cursor_on'      => pack( 'C',  0x13 ),
+    'cursor_off'     => pack( 'C',  0x14 ),
+    'reset'          => pack( 'C',  0x1F ),
+    'scroll_message' => pack( 'C',  0x05 ),     # Followed by up to 45 chars.
 );
 
 # A few more useful control sequences:
-$pd_control{'new_line'} = $pd_control{'cr'}.$pd_control{'lf'};
+$pd_control{'new_line'} = $pd_control{'cr'} . $pd_control{'lf'};