Movatterモバイル変換


[0]ホーム

URL:


Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

Sign up
Appearance settings

Commit149ac7d

Browse files
committed
Replace pgindent shell script with Perl script. Update perltidy
instructions to perltidy Perl files that lack Perl file extensions.pgindent Perl coding by Andrew Dunstan, restructured by me.
1 parent4639432 commit149ac7d

File tree

3 files changed

+583
-379
lines changed

3 files changed

+583
-379
lines changed

‎src/tools/pgindent/README

Lines changed: 9 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,3 @@
1-
src/tools/pgindent/README
2-
31
pgindent
42
========
53

@@ -26,9 +24,7 @@ This can format all PostgreSQL *.c and *.h files, but excludes *.y, and
2624

2725
6) Run pgindent:
2826

29-
find . -name '*.[ch]' -type f -print | \
30-
egrep -v -f src/tools/pgindent/exclude_file_patterns | \
31-
xargs -n100 src/tools/pgindent/pgindent src/tools/pgindent/typedefs.list
27+
pgindent
3228

3329
7) Remove any files that generate errors and restore their original
3430
versions.
@@ -46,7 +42,14 @@ This can format all PostgreSQL *.c and *.h files, but excludes *.y, and
4642

4743
9) Indent the Perl code:
4844

49-
find . -name \*.pl -o -name \*.pm |
45+
(
46+
find . -name \*.pl -o -name \*.pm
47+
48+
find . -type f -exec file {} \; |
49+
egrep -i ':.*perl[0-9]*\>' |
50+
cut -d: -f1
51+
) |
52+
sort -u |
5053
xargs perltidy --profile=src/tools/pgindent/perltidyrc
5154

5255
---------------------------------------------------------------------------

0 commit comments

Comments
 (0)

[8]ページ先頭

©2009-2025 Movatter.jp