#!/usr/bin/perl # This file is part of the LibreOffice project. # # This Source Code Form is subject to the terms of the Mozilla Public # License, v. 2.0. If a copy of the MPL was not distributed with this # file, You can obtain one at http://mozilla.org/MPL/2.0/. # # use strict; use warnings; use File::Find qw(finddepth); use File::Basename; # Find dirs in: # workdir/Dep/CxxObject/ # workdir/Dep/CObject # # Concat these files and compare them with the output of # `git ls-tree HEAD -r --name-only` and report files in the git ls-tree that aren't in the first. my @files; my $tmp; my %data = (); # define a wanted function sub wanted { return if($_ eq '.' || $_ eq '..' || -d $_); $tmp = basename($File::Find::name); # remove file extension ( .o ) $tmp =~ s/\.[^.]*$//; $data{$tmp} = $File::Find::name; } finddepth(\&wanted, 'workdir/Dep/CxxObject'); finddepth(\&wanted, 'workdir/Dep/CObject'); my @gitfiles = `git ls-tree HEAD -r --name-only`; # loop over found gitfiles foreach my $file (@gitfiles){ if($file =~ /\.[hxx|h|c|cxx]$/){ $tmp = basename($file); $tmp =~ s/\.[^.]*$//; chomp($tmp); if(!exists($data{$tmp})){ print $file; } } } distro/capgemini/cg-4.1 LibreOffice 核心代码仓库文档基金会
summaryrefslogtreecommitdiff
path: root/svx/inc/rulritem.hxx
AgeCommit message (Expand)Author
2004-02-26INTEGRATION: CWS os27 (1.4.562); FILE MERGEDKurt Zenker
2004-02-25INTEGRATION: CWS layoutmanager (1.4.384); FILE MERGEDKurt Zenker
2002-05-27#98405#: Put/QueryValue implementedMathias Bauer
2002-05-22#98405#: Query/PutValue changedMathias Bauer
2001-05-13replaced International with IntlWrapperEike Rathke