| OLD | NEW |
| 1 #!/usr/bin/perl -w | 1 #!/usr/bin/perl -w |
| 2 | 2 |
| 3 # Copyright (C) 2011 Adam Barth <abarth@webkit.org> | 3 # Copyright (C) 2011 Adam Barth <abarth@webkit.org> |
| 4 # | 4 # |
| 5 # Redistribution and use in source and binary forms, with or without | 5 # Redistribution and use in source and binary forms, with or without |
| 6 # modification, are permitted provided that the following conditions | 6 # modification, are permitted provided that the following conditions |
| 7 # are met: | 7 # are met: |
| 8 # 1. Redistributions of source code must retain the above copyright | 8 # 1. Redistributions of source code must retain the above copyright |
| 9 # notice, this list of conditions and the following disclaimer. | 9 # notice, this list of conditions and the following disclaimer. |
| 10 # 2. Redistributions in binary form must reproduce the above copyright | 10 # 2. Redistributions in binary form must reproduce the above copyright |
| (...skipping 162 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 173 | 173 |
| 174 sub conditionalStringFromAttributeValue() | 174 sub conditionalStringFromAttributeValue() |
| 175 { | 175 { |
| 176 my $object = shift; | 176 my $object = shift; |
| 177 my $conditional = shift; | 177 my $conditional = shift; |
| 178 | 178 |
| 179 return "ENABLE(" . join(') || ENABLE(', split('\\|', $conditional)) . ")"; | 179 return "ENABLE(" . join(') || ENABLE(', split('\\|', $conditional)) . ")"; |
| 180 } | 180 } |
| 181 | 181 |
| 182 1; | 182 1; |
| OLD | NEW |