[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 25d7c19 2/3: [admin int] Simplify perl script.
|
From: |
Thien-Thi Nguyen |
|
Subject: |
[elpa] master 25d7c19 2/3: [admin int] Simplify perl script. |
|
Date: |
Tue, 28 Feb 2017 01:04:47 -0500 (EST) |
branch: master
commit 25d7c19ad278d39b26940f0dfaaacb2c05d8b94b
Author: Thien-Thi Nguyen <address@hidden>
Commit: Thien-Thi Nguyen <address@hidden>
[admin int] Simplify perl script.
* admin/org-synch.sh (pkgname) [perl script]:
Eliminate sorting pass; don't bother w/ newline in output.
---
admin/org-synch.sh | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/admin/org-synch.sh b/admin/org-synch.sh
index 1bac8d7..130c2c8 100755
--- a/admin/org-synch.sh
+++ b/admin/org-synch.sh
@@ -29,7 +29,7 @@ test -L $0 || { hv=`dirname $0`/hv.sh ; test -r $hv && . $hv
; }
PATH="/bin:/usr/bin:/usr/local/bin:${PATH}"
-pkgname=`wget -q http://orgmode.org/elpa/ -O-|perl -ne 'push @f, $1 if
m/(org-\d{8}\.tar)/; END { @f = sort @f; print "$f[-1]\n"}'`
+pkgname=`wget -q http://orgmode.org/elpa/ -O-|perl -ne '$n = $1 if
(m/(org-\d{8}\.tar)/ && $1 gt $n); END { print "$n" }'`
cd $1
wget -q http://orgmode.org/elpa/${pkgname} -O ${pkgname}-tmp