FileVersionDiffBrowser.st
changeset 3864 7f45c918e0fe
parent 3849 20a999ca8246
equal deleted inserted replaced
3863:e13a7d334bb1 3864:7f45c918e0fe
     1 "{ Encoding: utf8 }"
       
     2 
       
     3 "
     1 "
     4  COPYRIGHT (c) 2019 by eXept Software AG
     2  COPYRIGHT (c) 2019 by eXept Software AG
     5               All Rights Reserved
     3               All Rights Reserved
     6 
     4 
     7  This software is furnished under a license and may be used
     5  This software is furnished under a license and may be used
  1359     revisionEntries := OrderedCollection new.
  1357     revisionEntries := OrderedCollection new.
  1360     versionInfoList do:[:eachVersionInfo |
  1358     versionInfoList do:[:eachVersionInfo |
  1361         revisions add:eachVersionInfo revision.
  1359         revisions add:eachVersionInfo revision.
  1362         revisionEntries add:(
  1360         revisionEntries add:(
  1363                     (eachVersionInfo revision)
  1361                     (eachVersionInfo revision)
  1364                     , ((' (by %2 at %3)' 
  1362                     , ((' (by %1 at %2)' 
  1365                         bindWith:(eachVersionInfo revision)
  1363                         bindWith:(eachVersionInfo user)
  1366                         with:(eachVersionInfo user)
       
  1367                         with:(eachVersionInfo date)) allGray)).
  1364                         with:(eachVersionInfo date)) allGray)).
  1368     ].
  1365     ].
  1369 
  1366 
  1370     revisions size < numOverallRevisions ifTrue:[
  1367     revisions size < numOverallRevisions ifTrue:[
  1371         revisions add:'...'.
  1368         revisions add:'...'.