(define (script-fu-position-layer img drw LeftCoord TopCoord)
  (gimp-layer-set-offsets drw  LeftCoord TopCoord)

  (gimp-displays-flush)
)

(script-fu-register "script-fu-position-layer"
            "_Position Layer..."
            "Simple script to input coordinates to the active layer"
            "Spencer Kimball, Joao S. O. Bueno Calligaris"
            "Spencer Kimball"
            "1996, 2006"
            ""
            SF-IMAGE      "Image"          0
            SF-DRAWABLE   "Drawable"       0
            SF-VALUE      "LeftCoord"            "0"
            SF-VALUE      "TopCoord"            "0")

(script-fu-menu-register "script-fu-position-layer"
             "<Image>/Script-Fu/")