diff options
Diffstat (limited to 'admin/update_autogen')
| -rwxr-xr-x | admin/update_autogen | 21 |
1 files changed, 10 insertions, 11 deletions
diff --git a/admin/update_autogen b/admin/update_autogen index d9d34fa3d6e..ef0edfef50c 100755 --- a/admin/update_autogen +++ b/admin/update_autogen | |||
| @@ -322,15 +322,20 @@ EOF | |||
| 322 | 322 | ||
| 323 | echo "Finding loaddef targets..." | 323 | echo "Finding loaddef targets..." |
| 324 | 324 | ||
| 325 | sed -n -e '/^AUTOGEN_VCS/,/^$/p' lisp/Makefile.in | \ | 325 | find lisp -name '*.el' -exec grep '^;.*generated-autoload-file:' {} + | \ |
| 326 | sed -e '/AUTOGEN_VCS/d' -e '/^$/d' -e 's/\\//' \ | 326 | sed -e '/loaddefs\|esh-groups/d' -e 's|/[^/]*: "|/|' -e 's/"//g' \ |
| 327 | >| $tempfile || die "sed error" | 327 | >| $tempfile || die "Error finding targets" |
| 328 | 328 | ||
| 329 | genfiles= | 329 | genfiles= |
| 330 | 330 | ||
| 331 | while read genfile; do | 331 | while read genfile; do |
| 332 | 332 | ||
| 333 | [ -r lisp/$genfile ] || die "Unable to read $genfile" | 333 | ## Or we can just use sort -u when making tempfile... |
| 334 | case " $genfiles " in | ||
| 335 | *" $genfile "*) continue ;; | ||
| 336 | esac | ||
| 337 | |||
| 338 | [ -r $genfile ] || die "Unable to read $genfile" | ||
| 334 | 339 | ||
| 335 | genfiles="$genfiles $genfile" | 340 | genfiles="$genfiles $genfile" |
| 336 | done < $tempfile | 341 | done < $tempfile |
| @@ -369,18 +374,12 @@ make -C lisp "$@" autoloads EMACS=../src/bootstrap-emacs || die "make src error" | |||
| 369 | cp $ldefs_in $ldefs_out || die "cp ldefs_boot error" | 374 | cp $ldefs_in $ldefs_out || die "cp ldefs_boot error" |
| 370 | 375 | ||
| 371 | 376 | ||
| 372 | cd lisp | ||
| 373 | |||
| 374 | echo "Checking status of loaddef files..." | 377 | echo "Checking status of loaddef files..." |
| 375 | 378 | ||
| 376 | ## It probably would be fine to just check+commit lisp/, since | 379 | ## It probably would be fine to just check+commit lisp/, since |
| 377 | ## making autoloads should not effect any other files. But better | 380 | ## making autoloads should not effect any other files. But better |
| 378 | ## safe than sorry. | 381 | ## safe than sorry. |
| 379 | modified=$(status $genfiles ${ldefs_out#lisp/}) || die | 382 | modified=$(status $genfiles $ldefs_out) || die |
| 380 | |||
| 381 | |||
| 382 | ## bzr status output is always relative to top-level, not PWD. | ||
| 383 | [ "$vcs" = "bzr" ] && cd ../ | ||
| 384 | 383 | ||
| 385 | 384 | ||
| 386 | commit "loaddefs" $modified || die "commit error" | 385 | commit "loaddefs" $modified || die "commit error" |