diff --git a/lib/azdist.f90 b/lib/azdist.f90
index 2fd26c3d7..41a8fc5bc 100644
--- a/lib/azdist.f90
+++ b/lib/azdist.f90
@@ -1,7 +1,7 @@
-subroutine azdist(grid1,grid2,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
+subroutine azdist(MyGrid,HisGrid,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
 
-  character*(*) grid1,grid2
-  character*6 MyGrid,HisGrid,mygrid0,hisgrid0
+  character(len=*) :: MyGrid,HisGrid
+  character*6 mygrid0,hisgrid0
   real*8 utch,utch0
   logical HotABetter,IamEast
   real eltab(22),daztab(22)
@@ -12,11 +12,6 @@ subroutine azdist(grid1,grid2,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
   data mygrid0/"      "/,hisgrid0/"      "/,utch0/-999.d0/
   save
 
-  MyGrid=grid1//'  '
-  HisGrid=grid2//'  '
-  if(ichar(MyGrid(5:5)).eq.0)  MyGrid(5:6)='  '
-  if(ichar(HisGrid(5:5)).eq.0) HisGrid(5:6)='  '
-
   if(MyGrid.eq.HisGrid) then
      naz=0
      nel=0
diff --git a/widgets/mainwindow.cpp b/widgets/mainwindow.cpp
index 7cb7ed2be..98768c4d2 100644
--- a/widgets/mainwindow.cpp
+++ b/widgets/mainwindow.cpp
@@ -7550,8 +7550,8 @@ void MainWindow::p1ReadFromStdout()                        //p1readFromStdout
       if(grid!="") {
         double utch=0.0;
         int nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter;
-        azdist_(const_cast <char *> (m_config.my_grid ().toLatin1().constData()),
-                const_cast <char *> (grid.toLatin1().constData()),&utch,
+        azdist_(const_cast <char *> ((m_config.my_grid () + "      ").left (6).toLatin1 ().constData ()),
+                const_cast <char *> ((grid + "      ").left (6).toLatin1 ().constData ()),&utch,
                 &nAz,&nEl,&nDmiles,&nDkm,&nHotAz,&nHotABetter,6,6);
         QString t1;
         if(m_config.miles()) {