diff --git a/lib/modules/Languages.pmod/PLIS.pmod b/lib/modules/Languages.pmod/PLIS.pmod
index 41ef5cdc6cd1f890e8649e5db99fc9e04a2e7050..013a4b9a46dc3b6ac95f23385730fd594d2525bd 100644
--- a/lib/modules/Languages.pmod/PLIS.pmod
+++ b/lib/modules/Languages.pmod/PLIS.pmod
@@ -551,12 +551,12 @@ class Parser
 	{
 	case ')': return Lempty;
 	case '.':
-	  object final = _read();
-	  if (intp(final) || (_read() != ')'))
+	  object fin = _read();
+	  if (intp(fin) || (_read() != ')'))
 	  {
 	    return 0;
 	  }
-	  return final;
+	  return fin;
 	default:
 	  throw( ({ "lisp->parser: internal error\n",
 		    backtrace() }) );