- Fixed a bug which caused the SICServer to die when a socket was broken.

- Fixed many things in DIFRAC subsystem:
  * Recoded tcentr.f etc so that the course centering will work and will not
    go into an endless loop.
  * fixed boundary overwrites which occurred when yesno or alfnum where
    uset to get a single character and several were given.
  * Addeded documentation for DIFRAC
- Added tcl-files which  support the WWW status system

difrac/prnbas.f

@@ -6,7 +6,8 @@ C-----------------------------------------------------------------------
       DIMENSION RW(3,3),ANG(3)
       CHARACTER CPROF*4,STRING*10
       WRITE (COUT,10000)
-      CALL ALFNUM (ANS)
+      CALL ALFNUM (STRING)
+      ANS = STRING(1:1)
       KZ = -1
       IF (ANS .EQ. ' ' .OR. ANS .EQ. '0') KZ = 0
       IF (ANS .EQ. '1') KZ = 1
@@ -115,7 +116,8 @@ C-----------------------------------------------------------------------
 C  Pause to allow users to read the screen
 C-----------------------------------------------------------------------
       WRITE (COUT,20000)
-      CALL ALFNUM (ANS)
+      CALL ALFNUM (STRING)
+      ANS = STRING(1:1)
 C-----------------------------------------------------------------------
 C  Theta min/max and h,k,l max data
 C-----------------------------------------------------------------------