aboutsummaryrefslogtreecommitdiffstats
path: root/phpBB/phpbb/template/twig/node/expression/binary/notequalequal.php
blob: 2e95c68090385a3da6739c676d78fd1f83a7422f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
<?php
/**
*
* This file is part of the phpBB Forum Software package.
*
* @copyright (c) phpBB Limited <https://www.phpbb.com>
* @license GNU General Public License, version 2 (GPL-2.0)
*
* For full copyright and license information, please see
* the docs/CREDITS.txt file.
*
*/

namespace phpbb\template\twig\node\expression\binary;


class notequalequal extends \Twig_Node_Expression_Binary
{
	public function operator(\Twig_Compiler $compiler)
	{
		return $compiler->raw('!==');
	}
}
'>40space:mode:
authorFrancois Pons <fpons@mandriva.com>2000-11-14 15:31:59 +0000
committerFrancois Pons <fpons@mandriva.com>2000-11-14 15:31:59 +0000
commit949a885497d3d05e4dc0dc20e52ecb758d9b677c (patch)
tree0e7a20d9c3694bc4c392ea420607b7cbacdf3814
parent01975efac2cb7e05fbe05ec3733ae904669a1e94 (diff)
downloaddrakx-949a885497d3d05e4dc0dc20e52ecb758d9b677c.tar
drakx-949a885497d3d05e4dc0dc20e52ecb758d9b677c.tar.gz
drakx-949a885497d3d05e4dc0dc20e52ecb758d9b677c.tar.bz2
drakx-949a885497d3d05e4dc0dc20e52ecb758d9b677c.tar.xz
drakx-949a885497d3d05e4dc0dc20e52ecb758d9b677c.zip
removed foreach (<... which are eating memory
Diffstat
-rw-r--r--perl-install/Xconfig.pm6
-rw-r--r--perl-install/Xconfigurator.pm18
-rw-r--r--perl-install/commands.pm8
-rw-r--r--perl-install/common.pm6
-rw-r--r--perl-install/detect_devices.pm24
-rw-r--r--perl-install/fsedit.pm5
-rw-r--r--perl-install/lang.pm3
-rw-r--r--perl-install/modparm.pm6
-rw-r--r--perl-install/modules.pm6
-rw-r--r--perl-install/network.pm6
-rw-r--r--perl-install/pkgs.pm32
-rw-r--r--perl-install/printer.pm34
12 files changed, 89 insertions, 65 deletions
diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm
index 585ed7247..350c7df33 100644
--- a/perl-install/Xconfig.pm
+++ b/perl-install/Xconfig.pm
@@ -40,9 +40,9 @@ sub getinfoFromXF86Config {
$o->{card}{server} ||= $1 if readlink("$prefix/etc/X11/X") =~ /XF86_ (\w+)$/x; #- /x for perl2fcalls
- local *F;
- open F, "$prefix/etc/X11/XF86Config" or return {};
- foreach (<F>) {
+ local *F; open F, "$prefix/etc/X11/XF86Config" or return {};
+ local $_;
+ while (<F>) {
if (/^Section "Keyboard"/ .. /^EndSection/) {
$o->{keyboard}{xkb_keymap} ||= $1 if /^\s*XkbLayout\s+"(.*?)"/;
} elsif (/^Section "Pointer"/ .. /^EndSection/) {
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index 98ab284ea..163801f13 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm