| 1 |
jlec 11/01/05 14:14:58 |
| 2 |
|
| 3 |
Modified: 2.1-expire.patch |
| 4 |
Log: |
| 5 |
Let cyana run forever, thanks xarthisius for the patch |
| 6 |
|
| 7 |
(Portage version: 2.2.0_alpha12/cvs/Linux x86_64) |
| 8 |
|
| 9 |
Revision Changes Path |
| 10 |
1.3 sci-chemistry/cyana/files/2.1-expire.patch |
| 11 |
|
| 12 |
file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-chemistry/cyana/files/2.1-expire.patch?rev=1.3&view=markup |
| 13 |
plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-chemistry/cyana/files/2.1-expire.patch?rev=1.3&content-type=text/plain |
| 14 |
diff : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-chemistry/cyana/files/2.1-expire.patch?r1=1.2&r2=1.3 |
| 15 |
|
| 16 |
Index: 2.1-expire.patch |
| 17 |
=================================================================== |
| 18 |
RCS file: /var/cvsroot/gentoo-x86/sci-chemistry/cyana/files/2.1-expire.patch,v |
| 19 |
retrieving revision 1.2 |
| 20 |
retrieving revision 1.3 |
| 21 |
diff -u -r1.2 -r1.3 |
| 22 |
--- 2.1-expire.patch 5 Jan 2011 11:27:10 -0000 1.2 |
| 23 |
+++ 2.1-expire.patch 5 Jan 2011 14:14:58 -0000 1.3 |
| 24 |
@@ -1,13 +1,15 @@ |
| 25 |
-diff --git a/src/inclan/unix.for b/src/inclan/unix.for |
| 26 |
-index 8650129..f08eeef 100644 |
| 27 |
---- a/src/inclan/unix.for |
| 28 |
-+++ b/src/inclan/unix.for |
| 29 |
-@@ -206,7 +206,7 @@ c ================================================================== |
| 30 |
+--- src/inclan/unix.for.orig 2011-01-05 14:56:46.572193759 +0100 |
| 31 |
++++ src/inclan/unix.for 2011-01-05 14:57:27.833627375 +0100 |
| 32 |
+@@ -206,11 +206,8 @@ |
| 33 |
end if |
| 34 |
if (iwbeg.lt.0) then |
| 35 |
iwbeg=igttim |
| 36 |
- iexpir=(julday(12,31,2010)-julday(1,1,1970))*24*3600 |
| 37 |
-+ iexpir=(julday(12,31,2011)-julday(1,1,1970))*24*3600 |
| 38 |
- if (iwbeg.gt.iexpir) call fatmsg ('License expired.') |
| 39 |
+- if (iwbeg.gt.iexpir) call fatmsg ('License expired.') |
| 40 |
++ iexpir=iwbeg+100 |
| 41 |
j=(iexpir-iwbeg)/(24*3600) |
| 42 |
- if (j.lt.1000) |
| 43 |
+- if (j.lt.1000) |
| 44 |
+- * call wrnmsg ('License expires in '//plural(j,'day')//'.') |
| 45 |
+ end if |
| 46 |
+ iwall=igttim-iwbeg |
| 47 |
+ c print *,'iwall = ',iwall,iwbeg,idat,itim |
| 48 |
\ No newline at end of file |
Archives